求助，我使用VBS脚本读取SQL数据库，但只能返回第一行数据，其它行不能返回，data.value=oRs.Fields(0).value有返回值，但data.value=oRs.Fields(1).value就没有数值了。添加游标，已经解决，感谢几位老师指点

下面是查询 代码
Set oRs=CreateObject("ADODB.Recordset")
Set oCom=CreateObject("ADODB.Command")
Set oCom.ActiveConnection=conn
oCom.CommandType=1
oCom.CommandText=sSql

Set oRs=oCom.Execute'(sSql)
lngCount = oRs.Fields.Count
Msgbox "。。。。oRs lngCount is "&lngCount

Dim data
Set data=HMIRuntime.tags("weather_h0")
data.value=oRs.Fields(0).value
data.write

oRs.movenext

Set data=HMIRuntime.tags("weather_h1")
data.value=oRs.Fields(0).value
data.write

oRs.movenext

Set data=HMIRuntime.tags("weather_h2")
data.value=oRs.Fields(0).value
data.write

oRs.movenext