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

ASP Framework¡¡£¨¶þ£© Êý¾Ý¿â²Ù×÷DBÀà

ÍøÕ¾¿ª·¢×î³£ÓÃ×îÖØÒªµÄÒ²ÊÇÊý¾Ý¿â²Ù×÷£¬¸Ã¿ò¼ÜµÄDBÀà·â×°Á˼¸ºõËùÓйØÓÚÊý¾Ý²Ù×÷²¿·Ö£¬²¢ÌṩÁËһЩ¸ß¼¶¹¦ÄÜÒÔ±ãÁé»îʹÓá£
ÊʺϲÙ×÷µÄÊý¾Ý¿âÀàÐÍ£ºACCESS£¬MSSQL
ËäÈ»ASPÒ²¿ÉÒÔ²Ù×÷ÆäËüÀàÐÍÊý¾Ý¿â£¬µ«ÄÇÖÖÇé¿ö·Ç³£ÉÙ£¬¶øÇÒ¼æÈÝÐÔÒ²²»Ì«ºÃ£¬ËùÒÔ±¾ÀàÖ»Ö§³ÖÕâÁ½ÖÖÊý¾Ý¿âÀàÐÍ¡£
ÊôÐÔ˵Ã÷£º
[setshowerr]
¿ÉÑ¡Öµ£º0£¬1£¬2£¬Ä¬ÈÏΪ1
ÉèÖÃÊý¾Ý¿â²Ù×÷ÖеĴíÎóÏÔʾÀàÐÍ
0Ϊ²»ÏÔʾ£¨ÊÊÓÃÓÚÍøÕ¾Õýʽ·¢²¼ºó£©
1ÏÔʾ¸ÃÀඨÒåµÄ´íÎóÌáʾ£¨Ìáʾ³ö´í·½·¨Ãû¼°³£¼ûÔ­Òò£©
2 ÏÔʾIIS´íÎóÌáʾ£¨ÊÊÓÃÓڸ߼¶¿ª·¢ÈËÔ±£©
[setdb_type]£¨Êý¾Ý¿âÀàÐÍ£¬0-ACCESS£¬1-MSSQL£¬Ä¬ÈÏΪ0£©
[setdb_host]
[setdb_user]
[setdb_password]
[setdb_name]
[setdb_path]£¨ÒÔÉϲ»ÔÙ½âÊÍÁË£¬Êý¾Ý¿â¸÷ÏîÅäÖÃÐÅÏ¢£©
[setpagesize]£¨·­Ò³£­Ã¿Ò³ÏÔʾ¼Ç¼Êý£¬Ä¬ÈÏΪ10£©
[setpageshownum]£¨·­Ò³£­ÏÔʾ·­Ò³Á´½ÓµÄ¸öÊý£¬Ä¬ÈÏΪ10£©
[setsql]£¨ÉèÖÃÍêÕûµÄSQLÓï¾ä£©
[settpl]£¨ÉèÖÃÑ­»·¶ÎHTMLÄ£°å£©
[setmsg]£¨ÉèÖõ±Ò»¸ö²éѯûÓмǼµÄʱºòÌáʾµÄÐÅÏ¢£©
·½·¨£º
[return]£¨1»òÕß0£©
·µ»Ø¼Ç¼ÊÇ·ñΪ¿Õ£¬Ï൱ÓÚrs.eof
[query]
·µ»Ø²éѯ½á¹û
Á½ÖÖÐÎʽ£º
Ì滻ģ°åºóµÄHTML´úÂ룬ǰÌáÊÇÄãÉèÖÃÁËsettpl
µÚ¶þÖÖÐÎʽ¶þάÊý¾Ý£¬Ï൱ÓÚGetRows
[all]
·µ»Ø²éѯ½á¹û£¬ÓëRSÀàËÆ£¬Çø±ðÊÇallÊÇÕë¶ÔÓÚ·­Ò³
[page]
·µ»Ø·­Ò³string£¬ÓëALLÅäºÏʹÓÃ
[TRY(sql)]
·µ»ØSQLÓï¾ä²Ù×÷״̬
Èç¹ûÊÇselectÓï¾ä£¬½«¿ÉÒÔÖ±½ÓʹÓÃquery·µ»Ø½á¹û
Èç¹ûÊÇɾ³ý¡¢Ð޸ģ¬³É¹¦Ôò·µ»Øtrue£¬·ñÔòfalse
[field(sql)]
Ö´ÐÐSQLÓï¾ä£¬·µ»ØµÚÒ»Ìõ¼Ç¼µÚÒ»¸ö×Ö¶ÎÖµ£¬Ï൱ÓÚrs(0)
[add(f_name,arr)]
Ìí¼ÓÒ»ÌõмǼ£¬ÓÃÓÚ±íµ¥Ìá½»£¬arrΪÐÎÈça(0) = "title|ÏÞÖÆÌõ¼þ»òÖµ"£¬a(1) = "adddate|notnull"£¬a(2) = "newsid|ID18"
½«·½·¨½«±íµ¥ÃûºÍ×Ö¶ÎÃû°ó¶¨£¬²¢¸ù¾Ý|ºóÃæµÄÄÚÈݽøÐÐÅжϻò¸³Öµ£¬Èçnotnull»á¼ì²éÊÇ·ñΪ¿Õ£¬ID18½«newsid×Ö¶ÎÌí¼ÓΪËæ»ú18λÊý×Ö£¬IPΪÓû§IP£¬µÈµÈ£¬¿ÉÒÔ¸ù¾Ý×Ô¼ºÐèÒªÉèÖøü¶àµÄ¹Ì¶¨ÖµºÍÅжϷ½·¨¡£
[update(f_name,id,arr)]
Ð޸ļǼ£¬ÓëADD·½·¨ÀàËÆ£¬¶àÁËÒ»¸öID£¬¼´ÏëÒªÐ޸ĵļǼµÄIDÖµ¡£
ʾÀý£º
Ê×Ïȸù¾Ý×Ô¼ºÐèÒª¸ü¸ÄÒ»ÏÂÊý¾Ý¿âÅäÖÃÐÅÏ¢£¬ÒòΪÊÇ¿ò¼Ü£¬ËùÒÔÕâЩ³£ÓõÄÉèÖÃÒѼ¯Öе½configÎļþ£¬·½±ãͳһ¹ÜÀí¡£
ÏȽéÉÜÒ»ÏÂsettpl£¬¹¦Äܷdz£Ç¿´ó¡£
±ÈÈçÎÒÃÇÏÖÔÚÒª×öÒ»¸öÏÔʾÐÂÎÅÁбíµÄÒ³Ã棬ʹÓÃsettpl½«»áʹ²Ù×÷±äµÃÒì³£¼òµ¥£¡
<%option explicit%>
'ÆäÖÐinclude.asp°üº


Ïà¹ØÎĵµ£º

aspÁ¬½ÓaccessÊý¾ÝÀý×Ó

<%Dim connstrconnstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("Stu.mdb")
Set bb = Server.CreateObject("ADODB.Connection")
bb.Open connstr%>
<html>
<head>
<meta http-equiv="content-Language" content="zh-cn" />
<meta http-equiv="Content-Type ......

aspÌí¼ÓÊý¾Ý¼Ç¼дÈë,ɾ³ý,²é¿´ÊµÁÐ

<!--#include file="conn.asp"-->
<%
if request.Form("username")="" or request.form("password")="" then
response.Write("<script>alert('ÄúºÃ£¬²»ÄÜΪ¿Õ
');location.href='index.html';</script>")
end if
%>
<%
di ......

aspÍøÕ¾´ÓACCESSתSQLSERVER


Ç°¼¸ÌìΪÖÆ×÷Ò»¸öÍøÕ¾£¬ÐèÒª´ÓACCESSתÖÁSQLSERVER£¬´ÓÍøÕ¾Éϲ鿴Á˺ܶàµÄ×ÊÁÏ£¬µ«¾õµÃûÓÐÒ»¸öÄܹ»È«Ã渲¸ÇÒªµãµÄ£¬ËùÒÔÎÒ×ܽáһϣ¬Ë³±ã
¸ø³öһЩ¾­Ñé¡£
   
Ê×ÏÈÈç¹ûÒ»¿ªÊ¼¾ÍÐèÒªÖÆ×÷SQLSERVERµÄÍøÕ¾£¬ÄÇô×îºÃ½«ÄãµÄ°®»ú×°ÉÏWINDOWS2000»òÕß2003ÕâÑùµÄSERVER°æ£¬ÕâÑùµÄ°æ±¾ÊÇÖ§³Ö
SQLSERVERÕýʽ ......

asp·ÀSQL×¢È뺯Êý


'SQL·À×¢È뺯Êý£¬µ÷Ó÷½·¨£¬ÔÚÐèÒª·À×¢ÈëµÄµØ·½Ìæ»»ÒÔÇ°µÄrequest("XXXX")ΪSafeRequest("XXXX")
  
'www.yongfa365.com
  
  
Function
 SafeRequest(ParaValue)   
    ParaValue = 
Trim
(
Request
(Pa ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ