代码高亮测试
本帖最后由 Ansifa 于 2012-10-8 09:37 编辑pde
#include <Wire.h>
#include <HMC5883L.h>
HMC5883L compass;
int error = 0;
void setup()
{
Serial.begin(57600);
Wire.begin();
compass = HMC5883L();
error = compass.SetScale(1.3);
compass.SetMeasurementMode(Measurement_Continuous);
}
void loop()
{
MagnetometerRaw raw = compass.ReadRawAxis();
MagnetometerScaled scaled = compass.ReadScaledAxis();
float xHeading = atan2(scaled.YAxis, scaled.XAxis);
float yHeading = atan2(scaled.ZAxis, scaled.XAxis);
float zHeading = atan2(scaled.ZAxis, scaled.YAxis);
xHeading += 0.0457;
if(xHeading < 0) xHeading += 2*PI;
if(xHeading > 2*PI) xHeading -= 2*PI;
if(yHeading < 0) yHeading += 2*PI;
if(yHeading > 2*PI) yHeading -= 2*PI;
if(zHeading < 0) zHeading += 2*PI;
if(zHeading > 2*PI) zHeading -= 2*PI;
float xDegrees = xHeading * 180/M_PI;
float yDegrees = yHeading * 180/M_PI;
float zDegrees = zHeading * 180/M_PI;
Serial.print(xDegrees);
Serial.print(",");
Serial.print(yDegrees);
Serial.print(",");
Serial.print(zDegrees);
Serial.println(";");
delay(100);
}
-----
vb
Imports System.IO
Imports System.Data
Imports System.Data.OleDb
Public Class LoginForm
Dim cn As New OleDbConnection
Dim cd As New OleDbCommand
Dim rd As OleDbDataReader
Dim ad As New OleDbDataAdapter
Dim ds As DataSet '当登录窗体载入时，设置连接字符串
Private Sub LoginForm_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim s As String = Directory.GetCurrentDirectory
cn.ConnectionString = "provider=Microsoft.Jet.OleDB.4.0;data source=" & s & "\db.mdb"
cd.Connection = cn
End Sub
'当单击确定按钮时，连接数据库用户表，验证用户名和密码，
'若一致则登录成功，显示主界面
Private Sub OK_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnlogin.Click
Dim userType As Integer
If Me.Text = "管理员" Then
userType = 1
Else
userType = 2
End If
cd.CommandText = "Select * FROM Where User_Name='" & txbUserName.Text & "' And User_Password='" & txbPassword.Text & "'" '设置SQL命令，从用户表中获取用户名与密码与数据库一致的记录
cd.Connection.Open() '打开连接
rd = cd.ExecuteReader '执行命令，并将返回值赋值给DataReader对象rd
rd.Read() '执行DataReader的Read方法，读取记录
'若数据读取器中有记录，则将ID，密码和用户类型赋值给三个公有变量，传递到主窗体中
'否则提示错误信息
If rd.HasRows Then
界面选择.Show()
Else
MsgBox("用户名或密码错误。")
Exit Sub
End If
cd.Connection.Close()
界面选择.Show()
End Sub
Private Sub Cancel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCancel.Click
Me.Close()
End Sub
End Class
sqlDROP TABLE IF EXISTS `cj_alibaba_company_new`;
CREATE TABLE `cj_alibaba_company_new` (
`company_id` mediumint(20) unsigned NOT NULL AUTO_INCREMENT,
`model` varchar(255) COLLATE utf8_unicode_ci DEFAULT NULL,
`address` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`established` mediumint(20) unsigned NOT NULL,
`anunal` mediumint(20) unsigned NOT NULL,
`management` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`custmers` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`export` mediumint(20) unsigned NOT NULL,
`bank` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`oem` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`account` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`quality_control` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`in_amount` mediumint(20) unsigned NOT NULL,
`out_amount` mediumint(20) unsigned NOT NULL,
`number` mediumint(20) unsigned NOT NULL,
`factory_area` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`monthly` mediumint(20) unsigned NOT NULL,
`page` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`lndustry` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`c_type` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`reg_capital` mediumint(20) unsigned NOT NULL,
`employees` mediumint(10) unsigned NOT NULL,
`legal` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`certification` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`from_url` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`info` text COLLATE utf8_unicode_ci NOT NULL,
`place` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`markets` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`logo` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`hao` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`m_phone` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`p_place` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`fax` text COLLATE utf8_unicode_ci NOT NULL,
`name` varchar(255) COLLATE utf8_unicode_ci NOT NULL,
`from_id` int(255) unsigned NOT NULL,
PRIMARY KEY (`company_id`)
) ENGINE=MyISAM AUTO_INCREMENT=7240 DEFAULT CHARSET=utf8 COLLATE=utf8_unicode_ci;
php<?php
set_time_limit(0);
require_once 'Client.php'; //pear HTTP_Client
$url = 'http://www.paipai.com/man/?PTAG=20034.2.3';//表单action url
$vars = array( //传输字段, '字段名'=>'值'
'KeyWord'=>'服装',
);
echo "vuyri";
$client = & new HTTP_Client();//实例化HTTP_Client
$a=$client->post($url, $vars);//提交表单
echo $url;
echo "vuyri";
?>
html<html>
<head>
<style>
.f {
float: right;
}
</style>
</head>
<body>
<form action="action" method="get">
<input type="text" name="abc">
<div id="buttons">
<input type="submit" class="f" name="next" value="Next">
<input type="submit" class="f" name="prev" value="Prev">
<div style="clear:both"></div><!-- Need this to have the buttons actually inside div#buttons -->
</div>
</form>
</body>
</html> jssc.oSyntaxList.cpp={title:"C++",aliases:["cpp","c++"],keyWords:" break case continue default do else for goto if return switch throw while "+"NULL false true enum errno EDOM "+"ERANGE FLT_RADIX FLT_ROUNDS FLT_DIG DBL_DIG LDBL_DIG "+"FLT_EPSILON DBL_EPSILON LDBL_EPSILON FLT_MANT_DIG DBL_MANT_DIG "+"LDBL_MANT_DIG FLT_MAX DBL_MAX LDBL_MAX FLT_MAX_EXP DBL_MAX_EXP "+"LDBL_MAX_EXP FLT_MIN DBL_MIN LDBL_MIN FLT_MIN_EXP DBL_MIN_EXP "+"LDBL_MIN_EXP CHAR_BIT CHAR_MAX CHAR_MIN SCHAR_MAX SCHAR_MIN "+"UCHAR_MAX SHRT_MAX SHRT_MIN USHRT_MAX INT_MAX INT_MIN "+"UINT_MAX LONG_MAX LONG_MIN ULONG_MAX HUGE_VAL SIGABRT "+"SIGFPE SIGILL SIGINT SIGSEGV SIGTERM SIG_DFL SIG_ERR "+"SIG_IGN BUFSIZ EOF FILENAME_MAX FOPEN_MAX L_tmpnam NULL "+"SEEK_CUR SEEK_END SEEK_SET TMP_MAX stdin stdout stderr "+"EXIT_FAILURE EXIT_SUCCESS RAND_MAX CLOCKS_PER_SEC "+"virtual public private protected template using namespace "+"try catch inline dynamic_cast const_cast reinterpret_cast "+"static_cast explicit friend wchar_t typename typeid class ",Funcs:" cin cerr clog cout delete new this "+"printf fprintf snprintf sprintf assert "+"isalnum isalpha isdigit iscntrl isgraph islower isprint "+"ispunct isspace ispunct isupper isxdigit tolower toupper "+"exp log log10 pow sqrt ceil floor fabs ldexp "+"frexp modf fmod sin cos tan asin acos atan atan2 "+"sinh cosh tanh setjmp longjmp asin acos atan atan2 "+"va_start va_arg va_end offsetof sizeof fopen freopen "+"fflush fclose remove rename tmpfile tmpname setvbuf "+"setbuf vfprintf vprintf vsprintf fscanf scanf sscanf "+"fgetc fgets fputc fputs getc getchar gets putc "+"putchar puts ungetc fread fwrite fseek ftell rewind "+"fgetpos fsetpos clearerr feof ferror perror abs labs "+"div ldiv atof atoi atol strtod strtol strtoul calloc "+"malloc realloc free abort exit atexit system getenv "+"bsearch qsort rand srand strcpy strncpy strcat strncat "+"strcmp strncmp strcoll strchr strrchr strspn strcspn "+"strpbrk strstr strlen strerror strtok strxfrm memcpy "+"memmove memcmp memchr memset clock time difftime mktime "+"asctime ctime gmtime localtime strftime "+"auto bool char const double float int long longint "+"register short shortint signed static struct "+"typedef union unsigned void volatile extern jmp_buf "+"signal raise va_list ptrdiff_t size_t FILE fpos_t "+"div_t ldiv_t clock_t time_t tm ",regLib:[{index:"//",reg:new RegExp("^//.*$"),css:"comment"},{index:"#",reg:new RegExp("^#[^<]*"),css:"sign"},{index:"<",reg:new RegExp("^\\s*<\\w+\\.\\w+>s*$"),css:"string"},{index:"/*",end:"*/",css:"comment",multiLine:true,escape:false},{index:"\"",end:"\"",css:"string",multiLine:true,escape:true},{index:"'",end:"'",css:"char",multiLine:true,escape:true},{index:"&",reg:new RegExp("\\&\\w+\\b"),css:"char"},{index:"!",reg:new RegExp("\\!\\="),css:"symbol"},{index:"=",reg:new RegExp("\\="),css:"symbol"},{index:"(",reg:new RegExp("\\("),css:"symbol"},{index:")",reg:new RegExp("\\)"),css:"symbol"},{index:"[",reg:new RegExp("\\["),css:"symbol"},{index:"]",reg:new RegExp("\\]"),css:"symbol"},{index:"-",reg:new RegExp("\\->"),css:"symbol"},{index:";",reg:new RegExp(";"),css:"symbol"},{index:".",reg:jssc.regDecimal,css:"num"}],collapse:{type:"sign",start:"{",end:"}"}} 没有基础，表示看不懂:$ 我也看不懂:o
页:
[1]