ROGI
|
ALTO PARAÍSO DE GOIÁS
GO - BRASIL
|
|
Postada em 24/03/2011 00:40 hs
Como posso fazer um login com o vb ligado ao banco de dados Access. |
|
|
|
|
|
|
|
Postada em 24/03/2011 07:31 hs
fazer a pesquisa.Digite Login, Seleciona meses ou ultimo ano e clique em atualizar. |
|
|
|
|
|
Postada em 24/03/2011 14:46 hs
Option Explicit
Global cn As ADODB.Connection
Global rs As ADODB.Recordset
Conexão:
Private Sub Main()
Dim strArquivo As String
Dim strLocal As String
Dim ConectaAccess As String
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset
strArquivo = "agenda.mdb"
strLocal = App.Path
Set cn = CreateObject("ADODB.Connection")
ConectaAccess = "Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=" & strArquivo & ";" & _
"DefaultDir=" & strLocal & ";" & _
"Uid=Admin;Pwd=;"
cn.Open ConectaAccess
End Sub
|
|
|
|
ROGI
|
ALTO PARAÍSO DE GOIÁS
GO - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 25/03/2011 19:47 hs
|
|
|
|
