当前位置: 首页 > 图文教程 > 数据库 > DB2 > 用表单来提交sql(转)3

DB2
Microsoft SQL Server 7.0数据库升级转换问题
Microsoft SQL Server 7.0数据库设置与数据结构
将Access数据库移植到Microsoft SQL Server 7.0
如何恢复系统数据库?
数据库复制技术在Internet上的实现
优化-数据库
全面优化ADO
将数据库中的数据通过client控件显示,有源代码
OSQL工具在DOS下的操作方式
用SQL Server为Web浏览器提供图像(一)(转)
用SQL Server为Web浏览器提供图像(二)(转)
用SQL Server为Web浏览器提供图像(三)(转)
用SQL Server为Web浏览器提供图像(四)(转)
用表单来提交sql(转)1
用表单来提交sql(转)2
用表单来提交sql(转)3
DB2 日期和时间的函数应用说明
DB2 常用命令速查(备忘)
DB2 常用命令小结
DB2 自动递增字段实现方法

DB2 中的 用表单来提交sql(转)3


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-10-31   浏览: 197 ::
收藏到网摘: 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 & ", "