Conexão Com Bd

[taffarel]

galera como eu faço uma conexão de BD em acess pra vb???

[fercosmig]

http://www.connectionstrings.com/

[taffarel]

cara na boa isso não mi ajudo muito, mais valeew

[fercosmig]

Public Sub Conecta_DB()

    Set conn = CreateObject("ADODB.Connection")

    conn.Open ("driver={Microsoft Access Driver (*.mdb)}; dbq=banco.mdb; defaultdir=" & App.Path & " ")

End Sub

um exemplo

abraços

[mestre fyoda]

mano se você não entender agora , pode para de programar em vb

[Guest Guest]

Por mais simples que seja , muitas pessoas tem dificuldade de entender certas "coisas"

[jntk]

Eu faço um pouco diferente:

'declaração de variáveis
Dim db As Database

'indicar o banco de dados
Set db = DBEngine.Workspaces(0).OpenDatabase("C:\database.mdb", False, False)

Mas isso funciona com o mdb 97...

Abraço

[mariozneto]

Eu uso assim:

Dim cnn As ADODB.Connection
Dim rs As ADODB.Recordset

Private Sub Form_Load()
  Set cnn = New ADODB.Connection
  cnn.ConnectionString = "Provider = Microsoft.jet.OLEDB.4.0; Data Source =c:\controle\controle.MDB"
  cnn.Open

  Set rs = New ADODB.Recordset
  rs.CursorLocation = adUseClient
  rs.Open "SELECT * FROM grupo", cnn, adOpenDynamic, adLockOptimistic

End Sub

Falow... T+

[tuliod]

e tem como fazer consultar um access que esteja no servidor?

como... "nome_servidor.v10.com.br/bd.mdb"

dae tem que colocar usuario e senha não é??

como ficaria?

valeeeu

abraço