SENHA DE BD

USUARIO.EXCLUIDOS 19/04/2004 09:09:32
#21269
Bom Dia!!!!!
Tenho o seguinte codigo

Private Sub Form_Load()
Dim teste As Database
Set teste = CreateDatabase("C:\Prg Programas\Teste.mdb", dbLangGeneral & ";pwd=nickolasgm;", dbEncrypt)
teste.Close
AbrirConexao
With Conexao
.Open
AbrirBD
Conectar.Open
.Execute "Select * into MKTTXE in 'C:\Prg Programas    este.mdb' & password=nickolasgm from MKTTXE"
Conectar.Close
.Close
MsgBox "Extração Concluida", vbInformation, "Atenção"
End With
End
End Sub

onde quando eu executo na linha do comando do .execute consta que a senha é invalida.

e o modulo q tenho é esse

Public Conexao As New ADODB.Connection
Public Tabela As New ADODB.Recordset
Public Conectar As New ADODB.Connection
Public SQL As String
Public Sub AbrirConexao()
Conexao = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Prg Programas\Servidor\Data.mdb;Persist Security Info=False;Jet OLEDB:Database Password=nickolasgm"
End Sub

Public Sub AbrirBD()
Conectar = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Prg Programas\Teste.mdb;Persist Security Info=False;Jet OLEDB:Database Password=nickolasgm"
End Sub



Alguem poderia me ajudar para saber o pq q isso acontece.

Valeu!!!!!!
USUARIO.EXCLUIDOS 19/04/2004 10:27:07
#21283 Resposta escolhida


Tenta executar sem o ponto e vírgula depois da senha...
Tópico encerrado , respostas não são mais permitidas
Voltar