复制代码代码如下 :
functioncheckfields (fieldsName, tablemename)
flag = false
sql = "select*from"& tablename
setrs = conn.execute (SQL)
fori = 0tors.fields.count-1
ifrs.fields (i) .name = fieldsnamethen
flag = true
exitfor
또 다른
flag = false
endif
다음
CheckFields = 플래그
최종 기능 장애