Run-time error '3633' - I REALLY NEED HELP PLEASE!!!

[SlinkyGirl]

Hi there.

I have a MS Excel workbook that contains a VB Macro. The Macro uses DAO/ODBC to retrieve data from a SQL database.

I can run the program some machines.
Some that it works on are win2000 with office 97 and XP Pro with office xp

but this is not a standard , cause it crashes with the following error on a machine running the sames as above.

I am gettign the error from the "CreateWorkspace" function.

This is the error:

Run-time error '3633':

Cannot load DLL: '?????L?'

I have tried unsuccessfully to resolve this by reinstalling and reregistering a number of dlls (eg: MDAC 2.8) - but all to no avail.

Anyone have any ideas what dll (if any) I should be looking for?

The offending code is like this:

Dim wsp As Workspace
Set wsp = CreateWorkspace("", "", "", dbUseODBC)


I'd appreciate any help!!

Thanks

 

[XL-Dennis]

Hi,

Sounds familar to me...

Is it this error-message You get:
"Run Time error 3633
Can't Load .DLL - MSJTER35.DLL"

The problem refer to the version of DAO Type Library in use:

http://support.microsoft.com/defaul...port/kb/articles/Q174/4/88.ASP&NoWebContent=1

Use method 2 in the KB-article

 

[SlinkyGirl]

THe error that i get is as i have typed below , there is NO reference to what the error is coming form only ?????L

I have tried using DAO 3.51 object library , but then it wont run on the XP machines unless you change it to the lates lib avaliable.

But my big problem is this ....

The one win2000 machine , it wont work at all , no matter what i select

When i go into tools/ references , the Microsoft DAO Object libs are listed there , but the program still gives me the same error.

One of the other win2000 machines doesnt even have any MS DAO libs listed at all.

But the program runs OK on an NT machine using DAO 3.5
I am really stumped.

 

[XL-Dennis]

I am really stumped.

Welcome to the world of mess...

I find it strange that one 2000-machine don't have any DAO-library at all.

Anyway, I would consider to use late binding instead of early binding. In that way the code use the available library on different windows-plattforms.

Any particular reason why You use DAO and not ADO?

 

[SlinkyGirl]

Anyway, I would consider to use late binding instead of early binding. In that way the code use the available library on different windows-plattforms.

Any particular reason why You use DAO and not ADO?

What do you mean by Late Binding???


I dont know anyother way. I have never used VB before and just dove in head first.
I do have a background in Java Programming. But i am a little rusty.

My big thing is i am connection to an AS400 server (IBM) using ODBC. I have been following a basic manual distrubuted by my company , but it was very basic.

this is what i am doing.....

Set ws = CreateWorkspace("A", "", "", dbUseODBC)
Set db = ws.OpenDatabase("")
Dim connect As String
connect = db.connect

Set db = ws.OpenDatabase("", , , connect)
sql = "SELECT " & finalSelection & Chr(13) & "" & Chr(10) & "FROM " & lib & "." & file1 & " " & file1 & textfinal1

Set rs = db.OpenRecordset(sql)


the red is where it is boming

i have to use connect as string - to bring up the ODBC Screen where the user selets what data source to connect to.