您所在位置：主题：新手刚学ASP谁能帮帮我啊 谢谢
gwj19821
[专家分：0] 发布于 2005-06-30 13:40:00
<%
dim Conn
set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open"Dbq="& Server.Mappath("database/jhd.mdb")&";Driver={Microsoft Access Driver (*.mdb)}"
%>
<%
if request.form("submit")="提交" then <table width="200" border="1">
x=request.form("shuliang")
set y=conn.execute("insert into kc(shuliang) values('"&x&"')")
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>售货单</title>
</head>
<body>
<table width="745" height="149" border="1" align="center">
<form name="form1" method="post" action="">
<tr>
<td height="20" colspan="2"><div align="center">售货单</div></td>
</tr>
<tr>
<td width="279" height="29"><div align="right">数量： </div></td>
<td width="353">
<input type="text" name="textfield">
</tr>
<tr>
<td height="19"><div align="center"></div></td>
<td> </td>
</tr>
<tr>
<td height="30"><div align="center"></div></td>
<td> </td>
</tr>
<tr>
<td height="21"><div align="right">
<p>提交：</p>
</div></td>
<td>
<input type="submit" name="Submit" value="提交">
</form>
</table>
</body>
</html>
我自己看书后试着弄的 用IIS浏览后提示告诉我有错误 究竟错在哪了那 谁能帮帮我 谢谢了
错误类型：
Microsoft VBScript 编译器错误 (0x800A0400)
/cangku.asp, 第 7 行, 第 36 列
if request.form("submit")="提交" then <table width="200" border="1">
dim Conn
set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open"Dbq="& Server.Mappath("database/jhd.mdb")&";Driver={Microsoft Access Driver (*.mdb)}"
%>
<%
if request.form("submit")="提交" then <table width="200" border="1">
x=request.form("shuliang")
set y=conn.execute("insert into kc(shuliang) values('"&x&"')")
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>售货单</title>
</head>
<body>
<table width="745" height="149" border="1" align="center">
<form name="form1" method="post" action="">
<tr>
<td height="20" colspan="2"><div align="center">售货单</div></td>
</tr>
<tr>
<td width="279" height="29"><div align="right">数量： </div></td>
<td width="353">
<input type="text" name="textfield">
</tr>
<tr>
<td height="19"><div align="center"></div></td>
<td> </td>
</tr>
<tr>
<td height="30"><div align="center"></div></td>
<td> </td>
</tr>
<tr>
<td height="21"><div align="right">
<p>提交：</p>
</div></td>
<td>
<input type="submit" name="Submit" value="提交">
</form>
</table>
</body>
</html>
我自己看书后试着弄的 用IIS浏览后提示告诉我有错误 究竟错在哪了那 谁能帮帮我 谢谢了
错误类型：
Microsoft VBScript 编译器错误 (0x800A0400)
/cangku.asp, 第 7 行, 第 36 列
if request.form("submit")="提交" then <table width="200" border="1">
