VServer list of Databases

[Damon Pillinger]

Hi Guys,
Am using this to get a list of databases on the server, it has worked
fine for the past hour but it now stops

  vs=new VServer("192.168.0.1","sa","sa")
  
  if vs<>nil then
    vs.OpenSession()
    listbox1.deleteAllRows
    
    i1=vs.DatabaseCount
    MsgBox str(i1)
    
    for i = 1 to i1
      dbi=new VDataBaseInfo
      dbi = vs.DatabaseInfo( i )
      ListBox1.AddRow dbi.Name
    next
    
  end if


There are 3 databases according to the i1 variable.

The first database "master" loads the information fine, but when it hits

dbi = vs.DatabaseInfo( i )  where i=2 it just locks up.

Any ideas, I have restarted the server, disabled/enabled the network
connections, deleted the databases and recreated etc...


I don't know if this counts but I had progressed all the way to running
SQL queries on the database/table and it returned weird characters i.e.
should have been 111 but returned 1 surrounded by unknown characters.

Thanks

Best regards

Damon L. Pillinger
Director Daisychain EDi
Suite 3
4 Winston Court
Moorabbin 3189
Phone : +61 3 9532 1220
Fax : +61 3 9532 1280