Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

aspÊý¾Ý¿âÁ¬½Ó´úÂë

conndb.asp
<%
Session.CodePage=65001
response.Charset="utf-8"
%>
<%
'Êý¾Ý¿âÁ¬½ÓÎļþ
dim conn
dim connstr
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+server.mappath("../date/#heihuhuhuajian.mdb")+";Jet OLEDB:Database Password=;"
set conn=server.createobject("ADODB.CONNECTION")
On Error Resume Next
conn.open connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "Êý¾Ý¿âÁ¬½Ó³ö´í£¬Çë¼ì²éÁ¬½Ó×Ö´®¡£"
Response.End
End If
%>
<%
'Êý¾Ý¿â±íÎļþ
'È«¾Ö±äÁ¿£¬·½±ã³ÌÐòµÄÕûÌå×ªÒÆ,Õ⼸¸ö±äÁ¿ÎªºËÐıäÁ¿¡£
dim table,tables,config
table="xinwen_fenlei" '¶¨Òå·ÖÀà±íµ¥µÄÃû³Æ
tables="news" '¶¨Òå´æ´¢Êý¾Ý±íµ¥µÄÃû³Æ
config="class_config" '¶¨Òå·ÖÀàÊôÐÔ±íµ¥µÄÃû³Æ
picwenzi="www.xx.cn" '¶¨ÒåˮӡͼƬµÄÎÄ×Ö
pickuandu=400 '¶¨ÒåËõÂÔͼµÄ¿í¶È
picgaodu=400 '¶¨ÒåËõÂÔͼµÄ¸ß¶È
pickuandu_xiao=105 '¶¨ÒåËõÂÔͼµÄ¿í¶È
picgaodu_xiao=100 '¶¨ÒåËõÂÔͼµÄ¸ß¶È
sites=""
%>
<%
'ÍøÕ¾»ù±¾ÐÅÏ¢ÏÔʾ
set rs_jiben=server.CreateObject("adodb.recordset")
rs_jiben.open "select * from site where id=1",conn,1,1
wznames=rs_jiben("title")
wzmiaoshu=rs_jiben("content")
wzkeys=rs_jiben("keys")
wztop=rs_jiben("top")
wzfoot=rs_jiben("foot")
rs_jiben.close
set rs_jiben=nothing

%>


Ïà¹ØÎĵµ£º

aspÁ¬½ÓMssqlµÄ·½·¨¼°³£¼ûµÄ´íÎó

aspÏνÓMssqlµÄ°ì·¨¼°³£¼ûµÄ²î´í
//µÚÒ»ÖÖд·¨£º
MM_conn_STRING = "Driver={SQL Server};server=(local);uid=sa;pwd=;database=infs;"
Set conn = Server.Createobject("ADODB.Connection")
conn.open MM_conn_STRING
SET RS=SERVER.CreateObject("ADOBD.recordset")
SQL="SELECT * from TABLE ORDER BY ID DESC"
R ......

asp Öг£ÓõÄÎļþ´¦Àíº¯Êý

asp Öг£ÓõÄÎļþ´¦Àíº¯Êý ÊÕ²Ø
asp Öд¦ÀíÎļþÉÏ´«ÒÔ¼°É¾³ýʱ³£ÓõÄ×Ô¶¨Ò庯Êý
<%
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'ËùÓÐ×Ô¶¨ÒåµÄVBSº¯Êý
''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
function DeleteFile(Filename) 'ɾ³ýÎļþ
&nbs ......

ÓÃVB°Ñasp·â×°³Édll


×î¼òµ¥ÓÃVB°Ñasp·â×°³ÉdllµÄÈëÃųÌÐò
µ±IIS±»ÇëÇóÖ´ÐÐÒ»¸öASP³ÌÐò,ËüÊ×ÏÈ»áÔÚASPÎļþÖÐÕÒµ½<%%>±êǩ֮¼äµÄ´úÂë,²¢ÇÒÖ´ÐÐËü(Ò²¿ÉÒÔÊÇ<scri ptrunat=server></script....>Ö®¼äµÄ´úÂë).Èç¹ûÕâ¸öASP³ÌÐòÔÚÏÈǰ±»µ÷Óùý,ÄÇôËü¾Í»áÓÃÄÚ´æÖеıàÒë¹ýµÄ³ÌÐòÀ´ÏòÓû§·µ»ØHTML´úÂë,Èç¹ûûÓÐ,ÄÇôËü¾ÍÖØÐ±àÒë.Õ ......

Asp³£ÓÃͨÓú¯ÊýÖ®Éú³Éʱ¼äµÄÕûÊý

¡¡ 'º¯ÊýÃû£ºGetMyTimeNumber()
  '×÷ ÓãºÉú³Éʱ¼äµÄÕûÊý
  '²Î Êý£ºlx ---- ʱ¼äÕûÊýµÄÀàÐÍ
  ' lx=0 µ½·ÖÖÓ lx=1 µ½Ð¡Ê± lx=2 µ½Ìì lx=3 µ½ÔÂ
  '·µ»ØÖµ£ºÉú³Éʱ¼äµÄÕûÊýÖµ(×îСµ½·ÖÖÓ)
  'ʾ Àý£º
  '********************************* ......

aspʵÏÖurlÖØÐ´ Ïêϸ½éÉÜ


Ç°ÃæËµÁË.NETÈçºÎα¾²Ì¬»¯£¬ÆäʵAsp urlα¾²Ì¬»¯Ò²ºÜ¼òµ¥ÁË¡£ºÃµÄ¶«Î÷´ó¼Ò·ÖÏíÏ£¡
Óв»¶®µÄ¿ÉÒÔ¼ÓÎÒQQ 282116460
ÏêϸÄÚÈÝÈçÏ£º
IISϰ²×°ÅäÖÃISAPI Rewrite£¬ÊµÏÖaspµÄ¾²Ì¬»¯µÄ·½·¨£¡
×î½üÒ»Ö±Ôڸ㰳СվµÄËÑË÷ÒýÇæÓÅ»¯£¬Ð§¹û»¹¿ÉÒÔ£¬´Ó10Ôµ׵ÄÿÌì40IPÉÏÉýµ½ÏÖÔÚÿÌì200¶à¸ö¡£²»¹ýÁ÷Á¿»¹ÊÇÌ«ÉÙÁË¡£¾Ý˵°Ñ¶¯Ì¬µÄÒ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ