当前位置: 首页 > 图文教程 > 网络编程 > ASP > 用表单来提交sql - 3

ASP
生成像资源管理器一样的树形目录
将连接数据库的代码隐藏在DLL中
ASP中从数据库读取二进制文件数据代码
asp查询xml的代码，实现了无刷新、模糊查询功能
一个asp函数， 解决SQL Injection漏洞
在ASP中利用COM组件开发Web应用程序
关于如何利用COM+，来提高ASP执行权限的问题!
升级MD5.ASP，打造完全动态不重复的安全加密代码
ASP安全检测与过滤函数SafeCheck
在ASP中，用JScript脚本实现分页的另类办法
查看服务器Application/Session变量工具
自己写的一个简单ASP调用存储过程查询
ASP登陆验证页应做的安全问题
使用ASP与javascript配合实现多个复选框数据关联显示
Windows 2003下不注册组件用ASP发邮件
数据分页方法新思路，速度非常快！
ASP程序中同一个用户不允许同时登陆两次
分栏显示记录集的表格演示，并实现了分页
关于Adodb.Stream的写数据库数据到客户端文件的实践
将ASP的Debug变得简单的两个函数

No. « 161 162 163 164 »

技术文章搜索

关键字

ASP 中的 用表单来提交sql - 3

出处:互联网   整理: 软晨网（RuanChen.com）   发布: 2009-11-03   浏览: 255 ::
收藏到网摘: n/a

  列表 D: buildSQLInsert函数的最终版。


<%
function buildSQLInsert( targetTable, omitFields)
         iStr = "insert into " & targetTable & " "
         vStr = "values ("
         nStr = "("
         ' 在表单集合中循环，并建立起SQL语句的组成部分
         for each x in request.form
                  fieldName = uCase(x)
                  ' 判断字段是否被省略？
                  if inStr(uCase(omitFields),x) = 0 then
                       fieldData = replace(request.form(fieldName), _
                                "'", "''")
                       ' 如果没有数据，就插入 NULL
                       if trim(fieldData) = "" then
                                fieldData = "NULL"
                                vStr = vStr & fieldData & ", "
                                nStr = nStr & fieldName & ", "
                       else
                                typeDelimPos = inStr(fieldName, "_")
                                if typeDelimPos = 0 then
                                     ' 是文本字段
                                     ' 建立字段名列表
                                     nStr = nStr & fieldName & ", "
                                     vStr = vStr & "'&