如何查找vbscript / asp中是否存在字段

Question

我有一个记录集。我想知道是否存在名为MyField的字段。

如何确定某个字段是否存在？

while not oRs.eof   
  if oRs.Fields("MyField").Exists = true and oRs("MyField") then 
    ' Result is true
  end if

  oRs.movenext
wend

Yrs Sincerly

Answer 1

您将需要一个辅助函数来迭代字段并进行比较;

dim exists: exists = ContainsField(oRs, "MyField")

while not oRs.eof 
    if exists ...

使用

function ContainsField(rs, name)
    dim fld
    name = UCase$(name)
    for each fld in rs.Fields
        if UCase$(fld.name) = name then
            ContainsField = true
            Exit Function
        end if
    next

    ContainsField = False
End function