链接数据库:
<%
dim conn
dim connstr
dim db
db="/DataBase/datamdb"
Set conn = ServerCreateObject("ADODBConnection")
connstr="Provider=MicrosoftJetOLEDB40;Data Source=" & ServerMapPath(""&db&"")
connOpen connstr
%>
插入记录:
<%
set rs = serverCreateObject ("Adodbrecordset")
sql = "select from [News]"
rsOpen sql,conn,1,3
rsAddNew
rs("title") = Request("title")
rs("Keywords") = request("Keywords")
rs("Description") = Request("Description")
rs("adddate") = Now()
rsUpdate
rsClose
set rs=nothing
%>
删除记录:
<%
set rs = serverCreateObject ("adodbrecordset")
sql = "delete from [News] where id="&Cint(Request("id"))&""
connexecute(sql)
set rs=nothing
%>
修改记录:
<%
sql="update [News] set [title]='"&Request("title")&"',[Keywords]='"&Request("Keywords")&"',[Description]='"&Request("Description")&"',adddate=Now() where id="&cint(request("id"))&""
connexecute(sql)
%>
以上就是关于asp中数据插入到数据库中,如果数据库中存在该用户名,则输出用户名已存在,如不存在则插入,以下是代码全部的内容,包括:asp中数据插入到数据库中,如果数据库中存在该用户名,则输出用户名已存在,如不存在则插入,以下是代码、asp向access数据库中插入记录显示网页时提示insert into语法错误,代码如下:<、asp中向数据库插入数据等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)