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

DB2
如何访问大型机、小型机上的DB2 9数据服务器
DB2 9(Viper)快速入门
段云峰:DB2 9对企业有3点帮助
DB2专家王云谈商业智能BI
DB2 9的九大新特性
国内学院派专家对DB2 9新产品赞不绝口
DB2中的数据移动(一)
DB2大事记
DB2编程序技巧(1)
创建一个空的IBM DB2 ECO数据库的方法
在DB2数据库的表中插入和删除数据
在DB2环境中创建DB2数据库
为DB2数据库创建表空间
DB2数据库SQL语法参考手册
使用 DB2 对象:创建模式、表和视图
使用 DB2 对象:创建约束
使用 DB2 对象:创建索引
导入、装载和导出DB2数据库的数据
为DB2数据库添加验证约束
从DB2数据表和视图查询数据

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


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