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)
10±íʾ¼ä¸ô10ÃëË¢ÐÂÒ»´Î
2)
<script>
window.location.reload(true);
</script>
Èç¹ûÊÇÄãҪˢÐÂijһ¸öiframe¾Í°Ñwindow¸ø»»³ÉframeµÄÃû×Ö»òIDºÅ
3)
<script>
window.navigate("±¾Ò³Ãæurl"); ......
´æ´¢½ø³Ì¾ÍÊÇ×÷Ϊ¿ÉÖ´ÐжÔÏó´æ·ÅÔÚÊý¾Ý¿âÖеÄÒ»¸ö»ò¶à¸öSQLÃüÁî¡£
¶¨Òå×ÜÊǺܳéÏó¡£´æ´¢½ø³ÌÆäʵ¾ÍÊÇÄÜÍê³ÉÒ»¶¨²Ù×÷µÄÒ»×éSQLÓï¾ä£¬Ö»²»¹ýÕâ×éÓï¾äÊÇ·ÅÔÚÊý¾Ý¿âÖеÄ(ÕâÀïÎÒÃÇ̸ֻSQL SERVER)¡£Èç¹ûÎÒÃÇͨ¹ý´´½¨´æ´¢½ø³ÌÒÔ¼°ÔÚASPÖе÷Óô洢½ø³Ì£¬¾Í¿ÉÒÔ±ÜÃ⽫SQLÓï¾äͬASP´úÂë»ìÔÓÔÚÒ ......
Á¬½Ó´úÂë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 ......
1.UpLoadClass.asp
<%
Class UpLoadClass
Private p_MaxSize,p_FileType,p_SavePath,p_AutoSave,p_Error
Private objForm,binForm,binItem,strDate,lngTime
Public FormItem,FileItem
Public Property Get Version
Version=""
End Property
......
<!--#include file="config.asp" -->
<!--#include file="Fun.asp" -->
<%
'Êý¾Ý¿â¹ÜÀíÀà
class Datas
'±¸·Ý
public sub Bk()
Set fso=server.createobject("scripting.filesystemobject")
fso.CopyFile Server.MapPath(SiteDataPath),Server.MapPath(SiteDataBakPath)
......