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
%>
Ïà¹ØÎĵµ£º
Active Server Pages ÌṩÄÚ½¨¶ÔÏó£¬ÕâЩ¶ÔÏóʹÓû§¸üÈÝÒ×ÊÕ¼¯Í¨¹ýä¯ÀÀÆ÷ÇëÇó·¢Ë͵ÄÐÅÏ¢¡¢ÏìÓ¦ä¯ÀÀÆ÷ÒÔ¼°´æ´¢Óû§ÐÅÏ¢£¨ÈçÓû§Ê×Ñ¡Ï¡£±¾ÎļòҪ˵Ã÷ÿһ¸ö¶ÔÏó¡£
Application ¶ÔÏó
¿ÉÒÔʹÓà Application ¶ÔÏóʹ¸ø¶¨Ó¦ÓóÌÐòµÄËùÓÐÓû§¹²ÏíÐÅÏ¢¡£
Request ¶ÔÏó
¿ÉÒÔʹÓà Request ¶ÔÏó·ÃÎÊÈκÎÓà HTTP Çë ......
Active Server Pages ÌṩÄÚ½¨¶ÔÏó£¬ÕâЩ¶ÔÏóʹÓû§¸üÈÝÒ×ÊÕ¼¯Í¨¹ýä¯ÀÀÆ÷ÇëÇó·¢Ë͵ÄÐÅÏ¢¡¢ÏìÓ¦ä¯ÀÀÆ÷ÒÔ¼°´æ´¢Óû§ÐÅÏ¢£¨ÈçÓû§Ê×Ñ¡Ï¡£±¾ÎļòҪ˵Ã÷ÿһ¸ö¶ÔÏó¡£
Application ¶ÔÏó
¿ÉÒÔʹÓà Application ¶ÔÏóʹ¸ø¶¨Ó¦ÓóÌÐòµÄËùÓÐÓû§¹²ÏíÐÅÏ¢¡£
Request ¶ÔÏó
¿ÉÒÔʹÓà Request ¶ÔÏó·ÃÎÊÈκÎÓà HTTP ÇëÇó ......
×î¼òµ¥ÓÃVB°Ñasp·â×°³ÉdllµÄÈëÃųÌÐò
µ±IIS±»ÇëÇóÖ´ÐÐÒ»¸öASP³ÌÐò,ËüÊ×ÏÈ»áÔÚASPÎļþÖÐÕÒµ½<%%>±êǩ֮¼äµÄ´úÂë,²¢ÇÒÖ´ÐÐËü(Ò²¿ÉÒÔÊÇ<scri ptrunat=server></script....>Ö®¼äµÄ´úÂë).Èç¹ûÕâ¸öASP³ÌÐòÔÚÏÈǰ±»µ÷Óùý,ÄÇôËü¾Í»áÓÃÄÚ´æÖеıàÒë¹ýµÄ³ÌÐòÀ´ÏòÓû§·µ»ØHTML´úÂë,Èç¹ûûÓÐ,ÄÇôËü¾ÍÖØÐ±àÒë.Õ ......
¡¡¡¡1.1 ʲôÊÇASP.net
¡¡¡¡ASP.net ÊÇÒ»ÖÖ½¨Á¢ÔÚͨÓÃÓïÑÔÉϵijÌÐò¹¹¼Ü£¬Äܱ»ÓÃÓÚһ̨Web·þÎñÆ÷À´½¨Á¢Ç¿´óµÄWebÓ¦ÓóÌÐò¡£ASP.netÌṩÐí¶à±ÈÏÖÔÚµÄWeb¿ª·¢Ä£Ê½Ç¿´óµÄµÄÓÅÊÆ¡£
¡¡¡¡Ö´ÐÐЧÂʵĴó·ùÌá¸ß
¡¡¡¡ASP.netÊǰѻùÓÚͨÓÃÓïÑԵijÌÐòÔÚ·þÎñÆ÷ÉÏÔËÐС£²»ÏñÒÔǰµÄASP¼´Ê±½âÊͳÌÐò£¬¶øÊǽ«³ÌÐòÔÚ·þÎñÆ÷¶ËÊ×´ÎÔËÐÐʱ½øÐ ......
<%
DirName="html\" '¾²Ì¬Îļþ±£´æµÄĿ¼£¬½áβӦ´ø"\"
foxrax=Request("foxrax")
if foxrax="" then
FileName=GetStr()&".html"
FileName=replace(FileName,"/","")'Ìæ»»×Ö·û
FileName=replace(FileName,"?","&qu ......