Hello listers,

In my previous post I asked for a Visual Basic program to open a data base
etc. All I really need is the correct format of the data base connection
string and the OpenDatabase method as it applies to HP3000.
This is what I have so far, which is not working.
(This particular example is using VB4.0)

Dim wspRemote As Workspace
Dim dbsRemote As Database
Dim strConnStr As String
strUserName = "MGR.DEV "
strPassword = "PASS "
strConnStr = "ODBC;DSN=hp3000;DATABASE=PROD.DBTEST;"
  & "UID=" & strUserName & "PWD=" & strPassword & ";"
Set wspRemote = DBEngine.Workspaces(0)
Set dbsRemote = wspRemote.OpenDatabase("", False, False, strConnStr)
dbsRemote.Close


I get booted out on the Set dbsRemote statement.
What am I doing wrong?

Thanks for your help

John


_________________________________________________________________
Chat with friends online, try MSN Messenger: http://messenger.msn.com

* To join/leave the list, search archives, change list settings, *
* etc., please visit http://raven.utc.edu/archives/hp3000-l.html *