用表单来提交sql - 3

2018-09-06 12:27

阅读:391

  列表 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
是文本字段


评论


亲,登录后才可以留言!