...erro ao conectar Banco de dados

[BaD.oX 0]

ola galera, sou novato em vb, e aqui neste forum tbm..Tipo, eu to fazendo um programa de cadastro de fornecedor, ai criei o banco de dados e tal, bom criei um modulo e nele criei a conexao ado com o bd q é a seguinte:Public cnnBD As ADODB.ConnectionPublic Sub Conecta_BD()cnnBD.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" & _"Data Source=" & App.Path & "\BdFornecedor.mdb;"cnnBD.OpenExit SubEnd Subaté ai tudo bem, mais quando executo o programa, ele da a seguinte msg de erro:Run Timer error '91':Object variable or with block variable not setalguem pode me dizer oq eu to fazendo de errado?? obrigado e agradeço

[Luizgrs 0]

lá no public faz assim:

public cnnBD as NEW adodb.connection

[BaD.oX 0]

puts é verdade, como poderia esquecer rsrsr agora ta tudo certinho, valeu mesmo em amigo abraço valeuuuuuuuuuu fui

[luiz humberto 0]

Tem dois modos de se fazer:

 

Dim StrConn as ADODB.ConnectionDim StrCon  as New ADODB.Connection

Dim StrConn New ADODB.Connection

[Luizgrs 0]

A primeira alternativa num seria?

Dim conn as adodb.recordsetset conn = new adodb.recordset