Olen katellu aikasempia keskusteluja aiheeseen liittyen, mutta en ole saanut tätä yhteyttä vielä luotua. Voisiko joku asiasta enemmän tietävä auttaa?
Koodi näyttää tältä:
Private Sub Form_Load() Set Yhteys = New ADODB.Connection 'Asettaa Yhteys -metodin uudeksi ADO-tietokantayhteydeksi Yhteys.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & App.Path & "\asd.mdb" Yhteys.Open 'Avataan tietokantayhteys End Sub
Virheilmoitus: Compile error: User-defined type not defined
Ja kieli on VB6
Moikka Dyer!
Mitä todennäköisimmin Projektistasi puuttuu viittaus Microsoft ActiveX Data Objects Libray'n - elikä klikkaa VB:ssä Project -> References -> ruksaa listalta Microsoft ActiveX Data Objects Library 2.x (valitse uusin) -> klikkaa OK - ja jutskat alkaa toimimaan...
Eli siis:
Dim Yhteys As ADODB.Connection Set Yhteys = New ADODB.Connection '... '... '... 'ja kun olet sulkenut yhteyden tietokantaan... Set Yhteys = Nothing
Kiitos neau33. Rupesi toimimaan :P
Aihe on jo aika vanha, joten et voi enää vastata siihen.