ASPº¯Êý´óÈ«
ASPº¯ÊýÓëVBSCRIPTÀàËÆ£¬ÒÔϾÙһЩ³£Óõĺ¯Êý¡¡
¡¡
Array()¡¡
¡¡
º¯Êý·µ»ØÒ»¸öÊý×é¡¡
¡¡
±í´ïʽ Array(list)¡¡
¡¡
ÔÊÐíÊý¾ÝÀàÐÍ: ×Ö·û£¬Êý×Ö¾ù¿É¡¡
¡¡
ʵÀý£º <%¡¡
¡¡
Dim myArray()¡¡
¡¡
For i = 1 to 7¡¡
¡¡
Redim Preserve myArray(i)¡¡
¡¡
myArray(i) = WeekdayName(i)¡¡
¡¡
Next¡¡
¡¡
%>¡¡
¡¡
·µ»Ø½á¹û: ½¨Á¢ÁËÒ»¸ö°üº¬7¸öÔªËØµÄÊý×émyArray¡¡
¡¡
myArray("Sunday","Monday", ... ... "Saturday"¡¡
¡¡
¡¡
CInt()¡¡
¡¡
º¯Êý½«Ò»¸ö±í´ïʽת»¯ÎªÊý×ÖÀàÐÍ¡¡
¡¡
±í´ïʽ CInt(expression)¡¡
¡¡
ÔÊÐíÊý¾ÝÀàÐÍ: ÈκÎÓÐЧµÄ×Ö·û¾ù¿É¡¡
¡¡
ʵÀý£º <%¡¡
¡¡
f = "234"¡¡
¡¡
response.write cINT(f) + 2¡¡
¡¡
%>¡¡
¡¡
·µ»Ø½á¹û: 236¡¡
¡¡
ת»¯×Ö·û"234"ΪÊý×Ö"234"£¬Èç¹û×Ö·û´®Îª¿Õ£¬Ôò·µ»Ø0Öµ¡¡
¡¡
¡¡
CreateObject()¡¡
¡¡
º¯Êý½¨Á¢ºÍ·µ»ØÒ»¸öÒÑ×¢²áµÄACTIVEX×é¼þµÄʵÀý¡£¡¡
¡¡
±í´ïʽ CreateObject(objName)¡¡
¡¡
ÔÊÐíÊý¾ÝÀàÐÍ: objName ÊÇÈκÎÒ»¸öÓÐЧ¡¢ÒÑ×¢²áµÄACTIVEX×é¼þµÄÃû×Ö.¡¡
¡¡
ʵÀý£º <%¡¡
¡¡
Set con = Server.CreateObject("ADODB.Connection"¡¡
¡¡
%>¡¡
¡¡
¡¡
CStr()¡¡
¡¡
º¯Êýת»¯Ò»¸ö±í´ïʽΪ×Ö·û´®.¡¡
¡¡
±í´ïʽ CStr(expression)¡¡
¡¡
ÔÊÐíÊý¾ÝÀàÐÍ: expression ÊÇÈκÎÓÐЧµÄ±í´ïʽ¡£¡¡
¡¡
ʵÀý£º <%¡¡
¡¡
s = 3 + 2¡¡
¡¡
response.write "The ·µ»Ø½á¹û is: " & cStr(s)¡¡
¡¡
%>¡¡
¡¡
·µ»Ø½á¹û: ת»¯Êý×Ö“5”Ϊ×Ö·û“5”¡£¡¡
¡¡
¡¡
Date()¡¡
¡¡
º¯Êý·µ»Øµ±Ç°ÏµÍ³ÈÕÆÚ.¡¡
¡¡
±í´ïʽ Date()¡¡
¡¡
ÔÊÐíÊý¾ÝÀàÐÍ: None.¡¡
¡¡
ʵÀý£º <%=Date%>¡¡
¡¡
·µ»Ø½á¹û: 9/9/00¡¡
¡¡
¡¡
DateAdd()¡¡
¡¡
º¯Êý·µ»ØÒ»¸ö±»¸Ä±äÁ˵ÄÈÕÆÚ¡£¡¡
¡¡
±í´ïʽ DateAdd(timeinterval,number,date)¡¡
¡¡
ÔÊÐíÊý¾ÝÀàÐÍ:¡¡
timeinterval is the time interval to add;¡¡
number is amount of time intervals to add;¡¡
and date is the starting date.¡¡
¡¡
ʵÀý£º <%¡¡
¡¡
currentDate = #9/9/00#¡¡
¡¡
newDate = DateAdd("m",3,currentDate)¡¡
¡¡
response.write newDate¡¡
¡¡
%>¡¡
¡¡
¡¡
<%¡¡
¡¡
currentDate = #12:34:45 PM#¡¡
¡¡
newDate = DateAdd("h",3,currentDate)¡¡
¡¡
response.write newDate¡¡
¡¡
%>¡¡
Ïà¹ØÎĵµ£º
Ò³ÃæÉúÃüÖÜÆÚ
Ò³ ÃæÉúÃüÖÜÆÚÖ´ÐÐһϵÁв½Öè£ºÒ³ÃæµÄ³õʼ»¯¡¢ÊµÀý»¯¿Ø¼þ¡¢»¹ÔºÍά»¤×´Ì¬¡¢ÔËÐÐʼþ´¦Àí³ÌÐò´úÂë¡¢³ÊÏÖ¡£ÎªÁËÔÚºÏÊʵĽ׶ÎÖ´ÐÐËùÐèµÄ´úÂ룬ËùÒÔÒª¶ÔÒ³ÃæÉúÃü ÖÜÆÚ·Ç³£ÊìϤ¡£ÔÚÒ³ÉúÃüÖÜÆÚµÄ¸÷¸ö½×¶Î£¬Ò³Ãæ»áÖð¸öÒý·¢¶¨ÒåµÄʼþ£¬Í¨¹ý¶Ô´úÂ뿪·¢£¬ÔÚÒ³ÃæµÄÉúÃüʼþÖÐÖ´ÐÐÎÒÃÇËùÐèÒªµÄ³ÌÐò
Ò³ÉúÃüÖÜÆÚ½×¶Î
1¡ ......
Á¬½Ó´úÂë1Ö±½ÓÊäÈë
<%
Dim my_conn, sql,rs
Set my_conn = createobject("ADODB.Connection")
my_conn.open = "DRIVER={MySQL ODBC 3.51 Driver};"_
& "SERVER=localhost;"_ '·þÎñÆ÷Ãû
& "DATABASE=mybase;"_ 'Êý¾Ý¿âÃû
& "UID=root;PWD=111; OPTION=35;" 'Óû§ÃûºÍÃÜÂë
Set rs = Server.Crea ......
×î½üºÜ¿àÄÕ£¬µ±Êý¾Ý·ÃÎÊʧ°Ü»òÕ߳ɹ¦µÄʱºò£¬ÒªÒ³ÃæµÄjs´¦ÀíһЩЧ¹û£¬Ö»ÊDz»ÖªµÀÔõôµ÷Ó㬷dz£ÓôÃÆ¡£ÖÕÓÚÕÒ
µ½ÁËÒ»¸öµØ·½£º
ScriptManager.RegisterStartupScript(ListUpdatePanel, typeof(UpdatePanel), "", "alert(1);", true);
ÔÚºǫ́µÄº¯ÊýÖе÷ÓÃÕâ¸ö¼´¿É¡££¨Õë¶Ôupdatepanel£©Ë¢ÐÂÊý¾Ýºó£¬¾Í»áµ÷ÓÃjs ......
1.·Å×¢È뺯Êý
sub aspsql()
SQL_injdata = "'|;|and|exec|insert|select|delete|update|count|*|%|chr|mid|master|truncate|char|declare"
SQL_inj = split(SQL_Injdata,"|")
If Request.Form<>"" Then
For Each Sql_Post In Request.Form
For SQL_Data=0 To Ubound(SQL_inj)
if instr(Request.Form(Sql_Post) ......