set con=application("Cn") set rs=server.createobject("ADODB.recordset") rs.Open "select * from ProductEnterprises",con,1,3 rs.addnew rs("Memo")="shanghai" rs.update
试下面的行不行(xx代表数据库名,**代表表名)
<%@language=vbscript%>
<% option explicit
dim db,dbconn,rs
db="dsn=XX;driver={sql server}"
set dbconn=Server.CreateObject("adodb.connection")
dbconn.open db
set rs=Server.CreateObject("adodb.recordset")
rs.cursortype=1
rs.locktype=3
rs.open "**",dbconn,,2
rs.addnew
rs("")=my_value
rs.update
rs.close
dbconn.close
set rs=nothing
set dbconn=nothing
%>