Problemas com banco de dados

[Tiago José]

Olá Pessoal,

estou fazendo uma aplicação com banco de dados ado, quando executo a aplicação dá um erro 3706.

Segue-se o código para análise

Private Sub Form_Load()
On Error GoTo errConexao

cnnMeses.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0  Data Source=" & App.Path & "\database.mdb;"
cnnMeses.Open

errConexao:
MsgBox "Houve um erro na conexão - 3706"
End Sub

Por favor, preciso de ajuda...

Agradeço desde já

Editado Janeiro 3, 2008 por kuroi
Adicionar Tag CODE

[kuroi]

como você sabe q é erro 3706?? você pos pra mostrar esse numero, mas não necessariamente é esse o numero q da no Visual Basic. outra coisa, com esse codigo, ele vai dar essa mensagem sempre, mesmo q não ocorra o erro, ponha um Exit Sub antes do label do erro pra ver se continua.

se continuar então apague ou comente a linha On Error GoTo errConexao e ai veja qual a nova mensagem q aparece e poste pra gente ver.

[Graymalkin]

Falta um ";" (ponto-e-vírgula) depois do 0 (antes de "DataSource").

Abraços,

Graymalkin