28,408
社区成员
发帖
与我相关
我的任务
分享新写的一个asp程序，调用数据库出错，请帮忙看看
该程序从表单中接受一些很简单的数据，如姓名，性别，年龄，学历。然后将这些数据写到用access做的一个数据库里。现在我已经能从表单读取这些数据，但是往数据库中写数据却没有成功，请帮我看看我的语法有什么错误？
<%
ON Error Resume Next
Const adCmdText = 1
Const RecordsAffected = 30
DIM username, gender, age, knowledge
username = Request.Form( "username" )
gender = Request.Form( "gender" )
age = Request.Form( "age" )
knowledge = Request.Form( "knowledge" )
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.open "student"
CommandText = "Insert into table1(name,age,gender,knowledge)" &_
"Values("& username &","& age &","& gender &","& knowledge &")"
myConn.Execute CommandText,RecordsAffected,adCmdText
myConn.close
set myConn = nothing
%>
<HTML>
<HEAD>
<TITLE>Result</TITLE>
</HEAD>
<BODY>您的姓名是：<%=username%>
<P>性别：<%=gender%>
<p>年龄：<%=age%>
<p>学历：<%=knowledge%>
</BODY>
</HTML>
<%
ON Error Resume Next
Const adCmdText = 1
Const RecordsAffected = 30
DIM username, gender, age, knowledge
username = Request.Form( "username" )
gender = Request.Form( "gender" )
age = Request.Form( "age" )
knowledge = Request.Form( "knowledge" )
Set myConn = Server.CreateObject("ADODB.Connection")
myConn.open "student"
CommandText = "Insert into table1(name,age,gender,knowledge)" &_
"Values("& username &","& age &","& gender &","& knowledge &")"
myConn.Execute CommandText,RecordsAffected,adCmdText
myConn.close
set myConn = nothing
%>
<HTML>
<HEAD>
<TITLE>Result</TITLE>
</HEAD>
<BODY>您的姓名是：<%=username%>
<P>性别：<%=gender%>
<p>年龄：<%=age%>
<p>学历：<%=knowledge%>
</BODY>
</HTML>
...全文
请发表友善的回复…
发表回复
