UC知道在线等待,帮忙写个ASP提交数据到Access的完整代码
来源：百度知道 编辑：UC知道 时间：2024/05/31 13:33:13
我的数据库名是MMS.mdb
表名是SendMsgTable
字段为：自动编号MsgIndex ，PhoneNumber，MsgTitle，MsgType，MsgStatus
需要ASP代码：
实现：用户只需要在表单中提交 PhoneNumber 字段
就可以写入一行数据到Access表中。
具体解释下：
PhoneNumber为用户自主提交的字段
MsgTitle为生成随即6位数字
MsgType为默认值0
MsgStatus为默认值0
MsgTitle为生成随即6位数字 需要在写入数据时自动生成6位数字，一同写入数据库。
可能是我表达的不清楚。麻烦了
你好！我按您给的代码写了。但是数据提交不到Access。
我的ACCESS数据库是2003的。
MsgIndex这个字段不要不知道可以不可以。
PhoneNumber，MsgTitle，MsgType，MsgStatus
SQL语句 INSERT INTO "SendMsgTable" ("PhoneNumber", "MsgTitle", "MsgType", "MsgStatus")
VALUES ("值1", "值2", 0 ,0)
值1是PhoneNumber 用户自己提交的项。只提交一个PhoneNumber 其他的都自动默认就行
值2是MsgTitle 默认提交后生成的6位随即数字
MsgType 0
MsgStatus 0
麻烦帮我看下该怎么写
表名是SendMsgTable
字段为：自动编号MsgIndex ，PhoneNumber，MsgTitle，MsgType，MsgStatus
需要ASP代码：
实现：用户只需要在表单中提交 PhoneNumber 字段
就可以写入一行数据到Access表中。
具体解释下：
PhoneNumber为用户自主提交的字段
MsgTitle为生成随即6位数字
MsgType为默认值0
MsgStatus为默认值0
MsgTitle为生成随即6位数字 需要在写入数据时自动生成6位数字，一同写入数据库。
可能是我表达的不清楚。麻烦了
你好！我按您给的代码写了。但是数据提交不到Access。
我的ACCESS数据库是2003的。
MsgIndex这个字段不要不知道可以不可以。
PhoneNumber，MsgTitle，MsgType，MsgStatus
SQL语句 INSERT INTO "SendMsgTable" ("PhoneNumber", "MsgTitle", "MsgType", "MsgStatus")
VALUES ("值1", "值2", 0 ,0)
值1是PhoneNumber 用户自己提交的项。只提交一个PhoneNumber 其他的都自动默认就行
值2是MsgTitle 默认提交后生成的6位随即数字
MsgType 0
MsgStatus 0
麻烦帮我看下该怎么写
conn.asp文件：实现数据库连接
<%
dim conn,db
dim connstr
db="MMS.mdb" '数据库文件
on error resume next
connstr="DBQ="+server.mappath(""&db&"")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
set conn=server.createobject("ADODB.CONNECTION")
if err then
err.clear
else
conn.open connstr
end if
sub CloseConn()
conn.close
set conn=nothing
end sub
%>
phonenumber.asp文件：实现写数据库操作
<!--#include file="conn.asp"-->
<%
sql="select * from SendMsgTable where MsgIndex is null"
set rs=server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
rs.addnew
rs("PhoneNumber")=request("PhoneNumber")
rs("MsgType")=0
rs("MsgStatus")=0
Randomize
rs("MsgTitle")=int((999999-100000+1)*rnd+100000)
rs.u