aspÁ¬Êý¾Ý¿âµÄÎÊÌâ - Web ¿ª·¢ / ASP
aspÁ¬½Óoracleʱ±¨´í£º ADODB.Connection (0x800A0E7A) δÕÒµ½Ìṩ³ÌÐò¡£¸Ã³ÌÐò¿ÉÄÜδÕýÈ·°²×°¡£
aspÖеĴúÂëÈçÏ£º
VBScript code:
Dim MM_conora_STRING
MM_conora_STRING = "Provider=OraOLEDB.Oracle.1;User ID=lan;password=lan"
dim conn ,rs ,sql
set conn = server.CreateObject("adodb.connection")
conn.open MM_conora_STRING
set rs = server.CreateObject("adodb.recordset")
sql = "select * from users"
rs.open sql,conn,3
if rs.eof = false then
response.Write(rs("name") & "" & rs("pwd"))
end if
µ«ÈçÏ´úÂëÔÚVBÖÐÈ´ÄÜÕý³£ÔËÐУº
VB code:
Dim conn As Object
Dim rs As Object
Dim sql As String
sql = "select * from users"
Set conn = CreateObject("adodb.connection")
Set rs = CreateObject("adodb.recordset")
conn.Open "Provider=OraOLEDB.Oracle.1;User ID=lan;password=lan"
rs.Open sql, conn, 3
If rs.EOF = False Then
Debug.Print rs("name") & "" & rs("pwd")
End If
ÕâÊÇΪʲô£¿
MM_conora_STRING = "Provider=OraOLEDB.Oracle.1;User ID=lan;password=lan"
Ïà¹ØÎÊ´ð£º
ÍòÍøµÄ·þÎñÆ÷Ö§³Öα¾²Ì¬µÄ,Ö±½ÓÓÃrewriteÔÚweb.configÎļþд¹æÔò,Ò²²»Óð²×°×é¼þ¾Í¿ÉÒÔʵÏÖα¾²Ì¬,µ«ÊÇÔÚʱ´ú»¥Áª·þÎñÆ÷¾ÍÓò»ÁËÁË,×ÉѯËüµÄ¿Í·þ,Ëû˵ËûÃÇ·þÎñÆ÷(»ù±¾ÐÍC)²»Ö§³Öα¾²Ì¬µÄ.ÇëÎÊһϸ÷λÎÒ¸ÃÓÃʲô·½·¨ ......
Microsoft JET Database Engine '80040e07'
±ê×¼±í´ïʽÖÐÊý¾ÝÀàÐͲ»Æ¥Åä¡£
\wwwroot\update.asp, line 20
--------------------------------------------------------------------------------
Ho ......
ÎÒÓÐÁ½¸ödropdownlist¶¼°óºÃÁËÖµ£¬ÏëÑ¡ÖÐÒ»¸ödropdownlistÖеÄÖµ£¬È»ºóÔÚÁíÒ»¸ödropdownlistÖÐÑ¡ÖÐÏàÓ¦µÄÒ»Ïî¡£
²»ÊÇ´Óа󶨵ڶþ¸ödropdownlist£¬ÊÇÔÚÒѾ°óºÃµÄÖµµ±ÖÐÑ¡ÖÐÒ»¸ö¡£
ÎÒÏëÓÃjsд
ÇóÖú
Äã¿ÉÒÔ°Ñdrop ......
¹ØÓÚÍøÕ¾°²È«µÄÎÊÌ⣡
ÎÒÁ˽⵽µÄÍøÕ¾°²È«ÎÊÌâ°üÀ¨£º
sql×¢Èë©¶´ºÍ±©¿â©¶´»¹ÓÐÉÏ´«Â©¶´
³ýÁËÕâЩ»¹ÓÐÆäËûµÄ©¶´Ã´£¿
×¢Èë©¶´¿ÉÒÔͨ¹ý¹ýÂËÀ´·ÀÖ¹
±©¿â©¶´Ôõô·ÀÖ¹
»¹ÓÐÈËÉÏ´«µÄľÂíÊÇ.gif
ÕâÖÖ©¶´Ôõôȥ± ......
O O O O O O
|.......| |........| |.......|
| | |
O O ......