Would some kind sould post some VBS which will open & query a Sybase SQL Anywhere 7.0 DB which is running on a WinXP machine? I have hacked this together so far, but it fails on the Select statement.
TIA,
Dave...
Dim conn
Dim rs

Set conn = CreateObject("ADODB.Connection")
conn.ConnectionString = "DSN=csfics;server=RAFDATA;uid=fics;pwd=fics;"
conn.Open

Set rs = CreateObject("ADODB.Recordset")
rs.CursorType = 3
rs.LockType = 3
rs.conn.Execute "Select paid_dt from cs_loan_history", conn, , , 2
' rs.Source "Select cs_loan_history.paid_dt"

rs.MoveFirst
Wscript.Echo rs.Fields(0).Value

rs.Close
conn.Close
Set rs = Nothing
Set conn = Nothing