<%
Set oConn = Server.CreateObject("ADODB.Connection")
strconn="driver={sql server};server=gg;uid=sa;pwd=gg;database=shop;"
oconn.open strconn
%>
<%
'sql="select * from shop1"
'set rs=server.createobject("adodb.recordset")
'rs.open sql,oconn,1,1
'do while not rs.eof
%>
'server=gg中的gg是机器名

解决方案 »

  1.   

    上面的代码已经连接到数据库test了, 但是用recordset 打开记录时出错. 
    请问是什么原因?
    错误信息如下: 
    Microsoft VBScript 编译器错误 错误 '800a03f6' 缺少 'End' /iisHelp/common/500-100.asp,行242 Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e21' ODBC 驱动程序不支持所需的属性。 /ok.asp,行14请问帮助
      

  2.   

    14行就是   rs.open "select * from 1", conn ,1, 1 
    我原来认真看了很久都没有发现这个东西有什么不妥!现在问题已经解决.  原来是 "select * from 1"    我将这个表换为其它表, 就行了, 
    但我更加不明白,  那个数据库里面确实有这个"1"表啊,为什么不行呢?请兄弟们继续帮忙 
      

  3.   

    代码改为这个就ok   , 真是"1"字之差啊!
    <%
    strconn = "Driver={SQL Server};Description=sqldemo;SERVER=127.0.0.1;" _
    &"UID=sa;Password=;DATABASE=test"
    set conn = server.createobject("adodb.connection")
    conn.open strconnset rs=createobject("adodb.recordset")
    rs.open "select * from a", conn ,1, 1 
    %>