Re: -2147467259 Ado recordset open error Help!

Tech-Archive recommends: Speed Up your PC by fixing your registry

From: Val Mazur (group51a_at_hotmail.com)
Date: 09/04/04 

Date: Fri, 3 Sep 2004 21:14:00 -0400

Sorry, forgot to put the code

Public CN As ADODB.Connection
Dim rsPasswd As ADODB.Recordset

Set CN = New ADODB.Connection

DataBaseConnect = ="Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=d:\abc.mdb;" & _
           "User Id=admin;" & _
           "Password="

CN.ConnectionString = DataBaseConnect
CN.Open

Set rsPasswd = New ADODB.Recordset

rsPasswd.Open "select [username] from [password] order by [username]", CN '
here 

-- 
Val Mazur
Microsoft MVP
"sonic" <sonic@discussions.microsoft.com> wrote in message 
news:1F6F38E3-E025-458F-9CE8-320C33B73896@microsoft.com...
>I have an application which is fine in my computer: windows 2000+office xp
> chinese version+vb 6+ mdac 2.7.
>
> when I install the software to my user who has windows xp+office xp 
> english
> version+ mdac2.7, I can still make the connection. but when I start to run
> the first recordset, the system give me
> -2147467259(80004005) [Microsoft][ODBC Microsoft Access Driver] Selected
> collating sequence not supported by the operating system.
>
> I also installed the setup package in another windows xp+office xp 
> machine.
> It works fine.
>
> there is also another phenomenon that I have import function in the
> application which will import excel file to mdb database. I also use odbc 
> to
> open the excel file. System will give error if I try to open excel files
> created by my machine. I also create an excel file in the user machine. It
> can be opened without problem. Does it have any association with the 
> access
> problem?
>
> Is there Anyone can offer me helps? Thank you!
>
> Codes:
>
> Public CN As New ADODB.Connection
> DataBaseConnect = "driver={Microsoft Access Driver
> (*.mdb)};dbq=d:\abc.mdb;PWD=1234"
>
>    CN.ConnectionString = DataBaseConnect
>    CN.Open ' it is still good here
> Dim rsPasswd As New ADODB.Recordset
> rsPasswd.Open "select username from password order by username", CN ' here
> the error occurred
>
>
>
>