ACCESS转SQL后如何改代码 万分感谢

来源:百度知道 编辑:UC知道 时间:2024/06/15 16:48:05
我已经将ACCESS转成SQL也处理好自动编号时间等
就是不知道代码要如何改。代码如:
db1="/wap/gm/shouhud.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
conn.CommandTimeOut = 1200
connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db1)
conn.mode =3
conn.Open connstr

下面调用手机库要如何做:

set rs = server.CreateObject ("adodb.recordset")
sql="select top 1 id,gycy from gywhcy where id<="&idnum&" order by id desc"
set rs=conn.execute(sql)
if not rs.eof and not rs.bof then
gycy=rs("gycy")
end if
rs.close
set rs=nothing
rsads.close
set rsads=nothing

还有:
set objgbrs=Server.CreateObject("ADODB.Recordset")
conn.CommandTimeOut = 999
ssql="select * from bbs order by lmxh desc"
objgbrs.open ssql,conn,1,1

谢谢啦。。我刚刚接触SQL

access转SQL后基本上改动不大,主要是连接connect
这句connstr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db1)
改为
strSQLServerName = "(local)" '服务器名称或地址
strSQLDBUserName = "" '数据库帐号
strSQLDBPassword = "" '数据库密码
strSQLDBName = "" '数据库名称
connstr = "Provider=SQLOLEDB.1;Persist Security Info=False;Server=" & strSQLServerName & ";User ID=" & strSQLDBUserName & ";Password=" & strSQLDBPassword & ";Database=" & strSQLDBName & ";"

db1="/wap/gm/shouhud.mdb" 可以删掉了

其他的地方基本上不用改