快精灵印艺坊 您身边的文印专家
广州名片 深圳名片 会员卡 贵宾卡 印刷 设计教程
产品展示 在线订购 会员中心 产品模板 设计指南 在线编辑
 首页 名片设计   CorelDRAW   Illustrator   AuotoCAD   Painter   其他软件   Photoshop   Fireworks   Flash  

 » 彩色名片
 » PVC卡
 » 彩色磁性卡
 » 彩页/画册
 » 个性印务
 » 彩色不干胶
 » 明信片
   » 明信片
   » 彩色书签
   » 门挂
 » 其他产品与服务
   » 创业锦囊
   » 办公用品
     » 信封、信纸
     » 便签纸、斜面纸砖
     » 无碳复印纸
   » 海报
   » 大篇幅印刷
     » KT板
     » 海报
     » 横幅

用表单来提交SQL - 2

列表 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
%>



列表 C:把字段类型嵌入到HTML字段名中。


<%function buildSQLInsert( targetTable)
iStr = "insert into " & targetTable & " "
vStr = "values (" nStr = "("
\\\' 在表单集合中循环,并建立起SQL语句的组成部分
for each x in request.form
fieldName = x
fieldData = replace( request.form(fieldName), "\\\'", "\\\'\\\'")
typeDelimPos = inStr(fieldName, "_")
if typeDelimPos = 0 then
\\\' Its a text field
\\\' 建立字段名列表
nStr = nStr & fieldName & ", "
vStr = vStr & "\\\'" & fieldData & "\\\', "
else
\\\' 是另外一种数据类型
fieldType = left(fieldName, typeDelimPos - 1)
fieldName = mid(fieldName, typeDelimPos + 1)
\\\' 把字段名加入字段名列表中
nStr = nStr & fieldName & ", "
\\\' 把字段类型变成大写,以确保匹配
select case uCase(fieldType)
case "NUM"
vStr = vStr & fieldData & ", "
\\\' 把不明类型按文本型处理
case else
vStr = vStr & "\\\'" & fieldData & "\\\', "
end select
end if
next

\\\' 把结尾的", " 从我们建立的字符串中去掉
vStr = left(vStr, len(vStr) - 2) & ")"
nStr = left(nStr, len(nStr) - 2) & ") "

\\\' 把SQL语句组装起来
buildSQLInsert = iStr & nStr & vStr
end function


if trim(request("fName")) >< "" then
response.write( buildSQLInsert & ">BR<")
else
%>

<html>
<body>
<form name=f method=post action="listing3.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="num_age"><br>
<input type="submit" value="Submit">
</form>
</body>
</html>

<%
end if
%>
返回类别: 教程
上一教程: 把长的数字用逗号隔开显示
下一教程: 抓取动网论坛EMAIL地址的一段代码

您可以阅读与"用表单来提交SQL - 2"相关的教程:
· 用表单来提交SQL - 1
· 用表单来提交SQL - 3
· 页面自动刷新,又不用让用户按回车键来提交数据
· ASP中如何限制重复提交同一表单
· ASP小偷程序如何利用XMLHTTP实现表单的提交以及COOKIES或SESSION的发送
    微笑服务 优质保证 索取样品