aspÁ¬½ÓÊý¾Ý¿â´úÂë
·¢Ò»¸ö±ê×¼µÄÊý¾Ý¿âÁ¬½Ó´úÂ롣ϣÍû¶Ô´ó¼ÒÓаïÖú¡£
<%
option explicit
dim startime,endtime,conn,connstr,db
startime=timer()
'¸ü¸ÄÊý¾Ý¿âÃû×Ö
db="data/dvBBS5.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
'Èç¹ûÄãµÄ·þÎñÆ÷²ÉÓýÏÀϰ汾AccessÇý¶¯£¬ÇëÓÃÏÂÃæÁ¬½Ó·½·¨
'connstr="driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath(db)
conn.Open connstr
function CloseDatabase
Conn.close
Set conn = Nothing
End Function
%>
Ïà¹ØÎĵµ£º
Èç¹ûÔÚÒ»¸öÍøÕ¾µÄÒ³ÃæÖÐÏëµ÷ÓÃÆäËûÍøÕ¾Ò³ÃæÄÚÈÝ£¬Ö±½ÓÓÃһϴúÂë¾Íok£¬http://www.wanyusoft.com/index.asp Õâ¸ö·¾¶¾ÍÊÇËùÒªµ÷ÓõÄÒ³ÃæÂ·¾¶¡£
<%
response.write(getHTTPPage("http://www.wanyusoft.com/index.asp"))
function getHTTPPage(url)
dim http
set http=createobject("MSXML2.XMLHTTP")
Http.o ......
´Ó×Ö·û´®Öзµ»ØÖ¸¶¨ÊýÄ¿µÄ×Ö·û¡£
Mid(string, start, length)
²ÎÊý
string
×Ö·û´®±í´ïʽ£¬´ÓÖзµ»Ø×Ö·û¡£Èç¹û string °üº¬ Null£¬Ôò·µ»Ø Null¡£
Start
string Öб»ÌáÈ¡µÄ×Ö·û²¿·ÖµÄ¿ªÊ¼Î»Öá£Èç¹û start ³¬¹ýÁË string ÖÐ×Ö·ûµÄÊýÄ¿£¬Mid ½«·µ»ØÁ㳤¶È×Ö·û´® ("")¡£
Length
Òª·µ»ØµÄ×Ö·ûÊý¡£Èç¹ûÊ¡ ......
³öÏÖÕâ¸öÔÒòÊÇinternetÓû§·ÃÎʵÄȨÏÞ²»¹»£¬ÏµÍ³Ä¬ÈÏȨÏÞÊÇÖ»¶ÁµÄ£¬ËùÒÔÎÒÃÇÒª¸øËü·ÖÅä¿ÉÐÞ¸ÄȨÏÞ£¬·Ï»°²»¶à˵£¬½øÈëÖ÷Ì⣺
1.×ÊÔ´¹ÜÀíÆ÷——>¹¤¾ß——>Îļþ¼ÐÑ¡Ïî——>²é¿´
2.½«"¼òµ¥Îļþ¹²Ïí(ÍÆ¼ö)"Ñ¡ÏîÈ¥µô
3.Ñ¡ÔñÄãµÄWEBÎļþ¼Ð£¬¿´ÆäÊôÐÔ£¬ÕâʱÄã»á·¢ÏÖ¶àÁ˸ö"°²È«"Ñ¡Ï£ ......
ASP±àÂë¹æ·¶
µÚÒ»Õ ASP±àÂë¹æ·¶Í¨Êö
¡¡¡¡¡¡¡¡ASP±àÂë·ÖΪÁ½´ó²¿·Ö£¬Ò»²¿·ÖΪ¾²Ì¬Îļþ±àÂ룬һ²¿·ÖΪ°üº¬·þÎñÆ÷¶Ë½Å±¾µÄ¶¯Ì¬Îļþ±àÂë¡£
¡¡¡¡¡¡¡¡¾²Ì¬Îļþ±àÂë·Öscript±àÂëºÍHTML±àÂëÁ½²¿·Ö¡£
¡¡¡¡¡¡¡¡·þÎñÆ÷¶Ë±àÂëÔò·ÖΪ·þÎñÆ÷½Å±¾¡¢¿Í»§¶Ë½Å±¾¡¢HTML½Å±¾Èý²¿·Ö¡£
¡¡¡¡¡¡¡¡±àÂë¹æ·¶²ÉÓÃÈçÏÂÔ¼¶¨£º
¡¡¡¡¡¡¡¡ Ë ......
asp classÀàÓ÷¨
asp class
ÑϸñµØËµ£¬ASP ²¢²»ÊÇÒ»Ãűà³ÌÓïÑÔ£¬ËùÒÔ²»´æÔÚÀàÕâÒ»¸ÅÄÎÒÃÇÕâÀï˵ ASP ÀàÊÇÖ¸ ASP µÄ±à³ÌÓïÑÔ VBScript ÔÚ ASP ÀïÓ¦ÓÃʱµÄÀà¡£
ASP Àà±È½Ï¼òµ¥£¬Ëü²»¾ßÓÐÕæÕýÒâÒåÀàµÄ¼Ì³Ð¡¢ÖØÔصÈÌØÐÔ£¬¾¡¹ÜÈç´Ë£¬ËüÈÔÈ»ÊǷdz£ÓÐÓõģ¬Ëü½µµÍÁËÎÒÃDZà³ÌµÄ¸´ÔÓ¶È£¬Ê¹ÎÒÃǵijÌÐòÄ£¿é¸ü¼ÓºÏÀí¡£
A ......