Naišao sam na temu u kojoj je bio kod koji mi je pomogao, međutim kada sam ga postavio sve radi dok baza nema password, a kada na bazu zakačim pass (mora da bude) nemogu se konektovati jer ne znam kako da u VB6 postavim pass koji odgovara prilikom konekcije!
evo i koda
Function SumaKolone(polje As String)
Dim baza As Database
Set baza = OpenDatabase(App.Path & "\baza.mdb") 'Ovdje treba dodati pass ali kako???
SumaKolone = baza.OpenRecordset("SELECT SUM(" & polje & ") FROM tblUplate where KlijentiID=" & Val(lblID.Caption) & "").Fields(0).Value
baza.Close
End Function
Poruka koju mi izbacije je: 'Not a valid password'
P.S. Kada skinem pass sa baze sve radi kako mi i odgovara!