ʹÓÃAsp²Ù×÷Êý¾Ý¿â
1£®Í¨¹ýODBC»òÕßOLE·½Ê½Á¬½ÓµÄÇø±ð£¿
ÏÖÔÚÓÐÁ½ÖÖÁ¬½ÓÊý¾Ý¿âµÄ·½·¨¡£Ò»·½Ã棬¿ÉÒÔÓÃODBC²úÉúÒ»¸öÁ¬½Ó£¬ÕâÖÖÁ¬½ÓÓëÈκÎÓÐODBCÇý¶¯Æ÷µÄÊý¾Ý¿â£¨¼´»ù±¾ÉÏÊÇÊг¡ÉÏËùÓеÄÊý¾Ý¿â£©¼æÈÝ£»ÁíÒ»·½Ã棬¿ÉÒÔÓÃÔʼOLE DBÌṩÉ̲úÉúÒ»¸öÁ¬½Ó¡£
¸ÃÓÃÄĸöÌṩÉÌ£¿¾¡¿ÉÄÜÓÃÔʼOLE DBÌṩÉÌ£¬ÒòΪËüÌṩÁ˶ÔÊý¾Ý¸üÓÐЧµÄ·ÃÎÊ¡£MicrosoftÕýÖð²½ÓÃOLE DBÈ¡´úODBC±ê×¼£¬Ó¦¸Ã½ö½öÔÚûÓÐÔʼOLE DBÌṩÉÌʱʹÓÃODBC¡£
¢Å£®ÓÃODBC·½Ê½Á¬½ÓSQL Server£º
¢Ù£®ÅäÖÃODBC
¢Ú£®Á¬½Ó´úÂ룺
conn_odbc.asp
£¼%
Set Conn = Server.CreateObject("ADODB.Connection")
'Conn.Open "DSN=course_dsn;UID=course_user;PWD=course_password;DATABASE=course"
Conn.Open "course_dsn","course_user","course_password"
%£¾
×¢Ò⣺ÔÚÅäÖÃMyDSNʱÈôÖ¸¶¨Ä¬ÈÏÊý¾Ý¿âΪcourseÔòÉÏÊö´úÂë×÷ÓÃÏëͬ£¬·ñÔòµÚ¶þÐеÄÁ¬½Ó·½Ê½¸üÓÐÁé»îÐÔ£¬¿ÉÒÔÖ¸¶¨Á¬½Óij¸öÊý¾Ý¿â£¨µ±È»£¬Ç°ÌáÊÇcourse_user¶ÔÕâ¸öÊý¾Ý¿âÓвÙ×÷ȨÏÞ£©¡£
¢Æ£®ÓÃOLE·½Ê½Á¬½ÓSQL Server£º
conn_ole.asp
£¼%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "PROVIDER=SQLOLEDB;DATA SOURCE=10.1.43.238,2433; UID=course_user;PWD=course_password;DATABASE=course"
%£¾
2£®²Ù×÷Êý¾Ý¿â£ºConnectionºÍRecordset
ÁªºÏʹÓÃconnectionºÍrecordset²Ù×÷Êý¾Ý¿â£¬»òÕßֻʹÓÃconnection²Ù×÷Êý¾Ý¿â¡£
Àý×Ó£º
¢Å£®ÁªºÏʹÓÃconnectionºÍrecordset²Ù×÷Êý¾Ý¿â
use_db_1.asp
£¼%
Set conn=Server.CreateObject("ADODB.Connection") '´´½¨Á¬½ÓÊý¾Ý¿âµÄ¶ÔÏó
conn.Open "course_dsn","course_user","course_password" 'ʹÓøöÔÏóÁ¬½ÓÊý¾Ý¿â
Set rs=Server.CreateObject("ADODB.RecordSet") '´´½¨¼Ç¼¼¯¶ÔÏó
rs.Open "select * from user_info",conn,1,1 'ʹÓüǼ¼¯¶ÔÏó´ò¿ªÊý¾Ý¿â
if rs.recordcount£¾0 then 'Èç¹ûÓмǼ
response.write "User_id User_name<br£¾"
for i=1 to rs.recordcount 'Ñ»·¶ÁÈ¡ËùÓмͼ
response.write rs("id")&" "&rs("user_name")&"<br£¾"
'Ïòä¯ÀÀÆ÷Êä³ö¼Í¼µÄ×Ö¶Î
rs.movenext 'Ö¸ÕëÏÂÒÆÒ»ÐÐ
if rs.eof then exit for 'Èç¹ûµ½´ï¼Ç¼¼¯µ×²¿ÔòÍ˳öÑ»·
next
end if
%£¾
Ч¹û£º
User_
Ïà¹ØÎĵµ£º
×î¼òµ¥ÓÃVB°Ñasp·â×°³ÉdllµÄÈëÃųÌÐò
µ±IIS±»ÇëÇóÖ´ÐÐÒ»¸öASP³ÌÐò,ËüÊ×ÏÈ»áÔÚASPÎļþÖÐÕÒµ½<%%>±êǩ֮¼äµÄ´úÂë,²¢ÇÒÖ´ÐÐËü(Ò²¿ÉÒÔÊÇ<scri ptrunat=server></script....>Ö®¼äµÄ´úÂë).Èç¹ûÕâ¸öASP³ÌÐòÔÚÏÈǰ±»µ÷Óùý,ÄÇôËü¾Í»áÓÃÄÚ´æÖеıàÒë¹ýµÄ³ÌÐòÀ´ÏòÓû§·µ»ØHTML´úÂë,Èç¹ûûÓÐ,ÄÇôËü¾ÍÖØÐ±àÒë.Õ ......
ʹµØÖ·欄URL¹Ì¶¨£¬隱²Ø參數£º
<head>
</head>
<frameset>
<frame name="" src="Login.aspx" target="Login.aspx" scrolling="auto" noresize></frame>
<nofr ......
'creat by qqlxinye@tom.com
'time 2008-09-19
'qq:273453129
'web www.qqlxinye.cn
dim outSmtp,outUser,outPsd,recUser,recSubmit,bodyContent,AddAttachment,ifsend
function init_mail(str1,str2,str3,str4,str5,str6,str7)
outSmtp=str1
outUser=str2
outPsd=str3
recUser=str ......
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 Pass ......
Á©º¯Êý¸ã¶¨aspµÄormÓ³Éä
orm±ØÐëÓõ½ÊµÌåÀ࣬ÏñC#ÕâÑùµÄÓïÑÔ Ð´ÊµÌåÀàͦʹ¿àµÄ£¬³ý·ÇÓù¤¾ß
¶øaspÓиöºÃ´¦£¬ÒòΪËû¿ÉÒÔ¶¯Ì¬¹¹½¨Ò»¸ö×Ö·û´®²¢°Ñ´Ë×Ö·û´®¶¯Ì¬½âÎöΪ´úÂ룬Ҳ¾ÍÊÇËûµÄ execute ºÍ ExecuteGlobal Á©º¯Êý
ÏÂÃæÕâ¸öº¯ÊýÊÇ ÊµÌåÀàÉú³ÉÆ÷ Ö»Òª´«ÈëÁÐÃû×Ö·û´®¾ÍÄÜÉú³É Ò»¸öÈ«¾Ö¿ÉÓõÄÀà
'¶¨ÒåÒ»¸öʵÌåÀà
' ......