ʹÓÃ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_
Ïà¹ØÎĵµ£º
¡¡ 'º¯ÊýÃû£ºGetMyTimeNumber()
'×÷ ÓãºÉú³Éʱ¼äµÄÕûÊý
'²Î Êý£ºlx ---- ʱ¼äÕûÊýµÄÀàÐÍ
' lx=0 µ½·ÖÖÓ lx=1 µ½Ð¡Ê± lx=2 µ½Ìì lx=3 µ½ÔÂ
'·µ»ØÖµ£ºÉú³Éʱ¼äµÄÕûÊýÖµ(×îСµ½·ÖÖÓ)
'ʾ Àý£º
'********************************* ......
¡¡1.¼Ç¼¼¯¹Ø±Õ֮ǰÔٴδò¿ª:
¡¡¡¡------------------------------------
¡¡¡¡sql="select * from test"
¡¡¡¡rs.open sql,conn,1,1
¡¡¡¡if not rs.eof then
¡¡¡¡dim myName
¡¡¡¡myName=rs("name")
¡¡¡¡end if
¡¡¡¡sql="select * from myBook"
¡¡¡¡rs.open sql,conn,1,1
¡¡¡¡------------------------------------ ......
<%
'ÏÂÃæÊÇ×î¾ß¼¼Êõº¬Á¿µÄº¯ÊýÁË£¬¹þ¹þ~
'Ôö¼ÓÊý¾Ý¿â×Ö¶Î
function addziduan(ziduanming,ziduanleixing)
on error resume next
fldname = ziduanming
if ziduanleixing=1 or ziduanleixing=4 then
fldtype = "VarChar"
fldsize = 255
elseif ziduanleixing=2 or ziduanleixing=3 then
fldtyp ......
¿Í»§¶Ë´úÂ룺
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>Ê ......
¿ÉÒÔʹÓÃÏÂÃæµÄÈκÎASPÄÚÖöÔÏ󣬶ø²»±ØÔÚASP½Å±¾ÖÐÌØ±ðÉùÃ÷¡£
1£® Request£º
¶¨Ò壺¿ÉÓÃÀ´·ÃÎÊ´Óä¯ÀÀÆ÷·¢Ë͵½·þÎñÆ÷µÄÇëÇóÐÅÏ¢£¬¿ÉÓô˶ÔÏó¶ÁÈ¡ÒÑÊäÈëHTML±íµ¥µÄÐÅÏ¢¡£
¼¯£º
Cookies£ºº¬ÓÐä¯ÀÀÆ÷cookiesµÄÖµ
Form£ºº¬ÓÐHTML±íµ¥ÓòÖеÄÖµ
QueryString£ºº¬Óвéѯ×Ö·û´®µÄÖµ
ServerVariables£ºº¬ÓÐÍ·ºÍ»·¾³±äÁ¿ ......