Predmet:Re: Server i Access baza

---

Za slaganje probaj ovo ispraviti samo:
Private Sub MeniD_AfterUpdate()
Dim Nodx As Node
Dim Rs As Recordset
Dim Indeks As String
Dim Tekst As String
Dim SQL As String
Dim ImgI As Integer
Dim Db As Database
Dim Nadredjeni As String

Strojevi Me.MeniD, Me.MeniC
Set Db = CurrentDb

SQL = "SELECT * FROM Q_Indeks" ---->Ovdjer upisi:SQL = "SELECT * FROM "
On Error Resume Next
'DoCmd.Maximize
Me.sTREE.SetFocus
Start:
Pogledaj na formi jeli dobro slozeno. samo me to interesuje.

---