access操作问题.菜鸟问题高手莫怪.

jyjuse

$Form1 = GUICreate("Form1", 254, 182, 192, 114)
$addfld = ObjCreate("ADODB.Connection")
$addfld.Open ("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=server.mdb")
$RS =ObjCreate("ADODB.Recordset")
$RS.ActiveConnection = $addfld
$RS.Open ("SELECT * FROM green",$addfld)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
$RS.movenext
$err=_accessGetVal($addfld,"green", "WBNAME")
GUISetState(@SW_SHOW)
MsgBox(0,"",$err)
得到的问题第一条记录的内容,movenext不起做用.高手帮我看看那里错了.