1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

duvida em visual basic

Discussão em 'Programação' iniciada por leinad, 24 de Janeiro de 2008. (Respostas: 9; Visualizações: 1082)

  1. leinad

    leinad Power Member

    estou a tentar fazer uma ligação entre a aplicação em vb6.0 e e SQL Server, mas não estou a conseguir.... dá-me a seguinte mensagem: "Não foi encontrado o fornecedor. POderá não estar instalado correctamente"




    a que fornecedor se está a referir? ao de dados?
    não entendo... porque o fornecedor existe, que se chama 'FORNECEDORESsql...


    codigo que estou a utilizar:

    'o servidor é LEINAD\SQLEXPRESS
    'FORNECEDORESsql é o nome da urigem de dados

    dim cnn as ADODB.Connection
    set conn = New ADODB.Connection
    conn.open "Provider=LEINAD\SQLEXPRESS; Data Source=FORNECEDORESsql; User ID=; Password=;"


    'não tem pass nem login...


    Qual será o problema?
     
  2. Armadillo

    Armadillo Folding Member

  3. leinad

    leinad Power Member

    problema resolvido, brigado
     
  4. Estou a fazer um programa em VB para Gerir as musicas e DVD que tenho em casa mas ao guardar dá-me um erro:
    "Run Time Error 53"
    "File Not Found"
    Se puderem ajudar agradecia. =) (Deixo aqui o código)

    Private Sub cmdGuardar_Click()
    CommonDialog1.Filter = "*.mdb |*.mdb| (*.mdb)"
    CommonDialog1.FileName = "Backup"
    CommonDialog1.ShowSave
    destino = CommonDialog1.FileName
    If destino = "Backup" Then
    MsgBox "Backup cancelado", vbInformation, ("HouseGest")
    Exit Sub
    Else
    FileCopy App.Path & "\bdHouseGest.mdb", destino
    MsgBox "Backup criado com sucesso"
    End If
    End Sub
     
  5. Armadillo

    Armadillo Folding Member

    a linha onde te dá erro é esta?
    Código:
        FileCopy App.Path & "\bdHouseGest.mdb", destino
    
     
  6. Iah essa mesmo

    Eu já pensei que é de estar a base de dados aberta... mas não sei :/
     
    Última edição pelo moderador: 1 de Fevereiro de 2008
  7. Armadillo

    Armadillo Folding Member

    verifica se App.Path & "\bdHouseGest.mdb" é um caminho válido e se o ficheiro realmente existe
     
  8. é um caminho válido e também existe LOL... eu tive aulas disto na escola e lembor-me de uma vez o prof dizer que dava erro porque a base de dados estava aberta e por isso não iria funcionar... tinhamos de a fechar. mas eu já não me lembro como se faz :/
     
  9. Armadillo

    Armadillo Folding Member

    pode ser tambem. tenta fechar a conexao e depois faz o copyfile. Deve dar.

    Código:
    conexao.close   'fechar conexao ado
    
     
  10. Já resolvi o problema... Criei 1 form só para guardar e no outro fechei a ligação á base de dados.. obrigado Armadillo :P
     

Partilhar esta Página