<%@language="VBScript"%> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>无标题文档</title> </head>
<body> <form name="form1" method="post" action=""> <p> 姓名： <input name="n" type="text" id="n" size="10"> 年龄： <input name="a" type="text" id="a" size="6"> 工资： <input name="m" type="text" id="m" size="8"> 电话： <input name="p" type="text" id="p" size="12"> </p> <p> 地址： <input name="ad" type="text" id="ad"> 出生日期： <input name="b" type="text" id="b"> </p> <p> <input type="submit" name="Submit" value="提交"> <input type="reset" name="Submit2" value="重置"> </p> </form><p> <% sz = "'"& request.Form("n") &"','"& request.Form("a") &"','"& request.Form("m") &"','"& request.Form("p") &_ "','"& request.Form("ad") &"','"& request.Form("b") &"'" set obj=server.CreateObject("ADODB.Connection") obj.open"DSN=ql" Intodb = "Insert Into s1(姓名,年龄,工资,电话,地址,出生年月) values("& sz &")" obj.execute("Intodb") obj.close%> </body> </html> 显示无效的SQL语句，出错部分应该是红色字体部分。
