爱易网页
ASP教程
用表单来提交sql - 1
日期:2011-01-16 浏览次数:21080 次
<% '从表单中提取值 fName = request.form("fName") lName = request.form("lName") age = request.form("age") '建立SQL语句 iStr = "insert into uData (fName, lName, age) " iStr = iStr & "values (" iStr = iStr & "'" & fName & "', " iStr = iStr & "'" & lName & "', " iStr = iStr & age & ")" if trim(fName <> "") then response.write( iStr & "<BR>") else %> <html> <body> <form name=f method=post action="listing1.asp"> Gimme your:<br> First Name: <input type=text name="fName"><br> Last Name: <input type=text name="lName"><br> Age: <input type=text name="age"><br> <input type="submit" value="Submit"> </form> </body> </html> <% end if %> 列表 B:使用 request.form 来轻松建立SQL字符串。 <% iStr = "insert into uData " vStr = "values (" nStr = "(" ' 在表单集合中循环,并建立起SQL语句的组成部分 for each x in request.form ' 建立字段名列表 nStr = nStr & x & ", " ' 建立字段值列表 if uCase(x) = "AGE" then vStr = vStr & request.form(x) & ", " else vStr = vStr & "'" & request.form(x) & "', " end if next ' 把结尾的", " 从我们建立的字符串中去掉 vStr = left(vStr, len(vStr) - 2) & ")" nStr = left(nStr, len(nStr) - 2) & ") " ' 把SQL语句组装起来 iStr = iStr & nStr & vStr if trim(request("fName")) >> "" then response.write( iStr & ">BR>") else %> <html> <body> <form name=f method=post action="列表2.asp"> Gimme your:<br> First Name: <input type=text name="fName"><br> Last Name: <input type=text name="lName"><br> Age: <input type=text name="age"><br> <input type="submit" value="Submit"> </form> </body> </html> <% end if %>
免责声明: 本文仅代表作者个人观点,与爱易网无关。其原创性以及文中陈述文字和内容未经本站证实,对本文以及其中全部或者部分内容、文字的真实性、完整性、及时性本站不作任何保证或承诺,请读者仅作参考,并请自行核实相关内容。