Conexion Sql

[Fann_Lavigne]

Tengo el siguiente problema con una plicacion VB 6, la cual la conecto con una base de datos Sql de la siguiente manera:

Código:

 Set Conexion = Nothing
        Set Rst = Nothing
        '
        ' Crear los objetos
        Set Conexion = New ADODB.Connection
        Set Rst = New ADODB.Recordset
        '
        ' abrir la base usando las credenciales de Windows
        'Conexion.Open "Provider=SqlOleDB; " & _
                "Initial Catalog=Almacen; " & _
                "Data Source=" & server & "; " & _
                "integrated security=SSPI; persist security info=True;"
        With Conexion
            .ConnectionString = "Provider=SqlOleDB; " & _
                                "Initial Catalog=Almacen; " & _
                                "Data Source=bee04amstd; " & _
                                "integrated security=SSPI; persist security info=True;"
            .ConnectionTimeout = 10
            .Open
        End With

Todo va bien hasta ahi, se konecta y hace todo lo ke kiero, el problema es ke, instale el sistema en un Widnows 2000 profesional, y todo jala bien, pero kuando reinicio Widnows, y abro el sistema ke konecta kon la base de datos, este me dice ke no hay acceso a la base de datos.

Solo pasa esto al reiniciar Windows, si instalo de nuevo el programa, se konecta muy bien.

alguien sabe ke esta pasando?

[aldo1982]

hola, si bien no mne ekivoco tendrias ke hacer una odbc desde windows, esta odbc ke se conecte a la base de datos sql y tendria ke andar sin problemas .

salu2

pd: windows te tira el error?? o el sistema ke vos hiciste ??? o sql server ??

[Fann_Lavigne]

Iniciado por aldo1982

hola, si bien no mne ekivoco tendrias ke hacer una odbc desde windows, esta odbc ke se conecte a la base de datos sql y tendria ke andar sin problemas .

salu2

pd: windows te tira el error?? o el sistema ke vos hiciste ??? o sql server ??

El error me lo tira el sistema ke hice, y ya tengo un ODBC echo en windows, pero NO se komo usarlo en mi aplikacion de Visual Basic, tu sabes komo? Esa misma idea pense, pero no se komo usar mi ODBC kreado para usarlo en VB 6

[aldo1982]

hace esto, pone un adodc el, y en la configuracion del conectionstring hacelo por odbc y listo, se entiende ?? bue sino posteá
salu2

[Fann_Lavigne]

haaa ok si, entendi, pero no keria usar el adodc

[aldo1982]

bue yo hice de esa forma y bue asi por lo menos la coneccion es establecida al principio, luego haces todo desde código, la cosa es ke no te ponga error de conección al ejecutar el programa jejeej.
salu2 y espero te haya servido. bye

[Fann_Lavigne]

GRACIAS, ES KURIOSO, PERO DONDE TENGO MI CONECTIONSTRING, LE PUSE "dsn=almacen", HASTA AHI TODO VA BIEN, POR KE SE KONECTA A TRAVEZ DEL ODBC SIN UN ADODC, OSEA, KE SI USA EL ORIGEN DE DATOS, AHORA ES KE SIGO TENIENDO EL MISMO PROBLEMA AL REINICIAR LA PC, EL SISTEMA YA NO SE KONECTA A PESAR DE USAR EL ODBC GENERADO.....ESTO ESTA RARO, NUNKA ME HABIA PASADO ALGO ASI. KIERO PENSAR KE ES EL DRIVER DE ACCESO A DATOS....

[aldo1982]

ups, la verdad ke nunca me paso eso a mi fan, bue buscaré la forma de poder ayudarte, y ante cualkier cosa ke consiga te lo posteo aca mismo.

salu2

[Fann_Lavigne]

Muchas gracias, a mi tampoko me habia pasado algo asi, kiero pensar ke es el Windows 2000 profesional (Donde korro mi aplikacion) el del problema. Por ke lo probe en un XP y todo bien, lo probe en un Advanced Server (Donde la desarrolle) y todo bien. En fin, gracias.

[aldo1982]

y porque no instalas el winXP arriba del win 2000 ?? o no te dan los recursos ??
salu2

[Fann_Lavigne]

Si, kreo ke esa va a ser la ultima medida ke hare, lo ke pasa es ke ese sistema tenia ke jalar en kualkier version windows, pero en fin, kreo ke eso tendre ke hacer.

[aldo1982]

y si de ultima no te keda otra jeje.
salu2

[Fann_Lavigne]

Jejeje, ya lo resolvi gracias, solo era ke en el ConnectionString tenia ke ponerle User y ID, ke tonteria. pero bueno.

Gracias