dimConnasnewadodb.connection'asp中是setconn=createobject("adodb.connection")

dimrsasnewadodb.recordset'類似于你的setrs=createobject("adodb.recordset")

sql=sql語句

rs.opensql,conn'打開記錄集，后面可跟參數，指定參數不同游標類型也不相同

ifnotrs.eofthen'判斷SQL語句是否存在查詢到的記錄

ifisnull(rs(字段))=falsethen'確定指定字段不為空

變量=rs(字段)'獲得字段內容

endif

endif

rs.close'關閉記錄集

conn.close'關閉數據庫連接