Centar za edukaciju-BiH



#1 09.11.2011 09:13
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:kako dimenzionirati varijablu Yes/No
Radim funkciju za popunjavanje tablice ne temelju podataka iz Unbound forme. na formi imam i nekoliko Check Box-ova na temelju kojih se pomoču koda treba popuniti Yes/No polje u tablici.
Kako dimezionirati varijablu za Yes/No polje

Dio funkcije sa za check box glasi:
PreuzmiIzvorni kôd (vbnet):
  1. Dim Baza As Database
  2. Dim Rs1 As Recordset
  3.  
  4.  
  5. Dim UL_kantD1 As Boolean '[ kako ovo dimenzionirati]
  6.  
  7. Set rsc = Nothing
  8. Set Baza = CurrentDb()
  9.  
  10. UL_KantD1 = Me.D_1
  11.  
  12.  
  13.  
  14. Set Rs1 = Baza.OpenRecordset("tblPopis")
  15.  
  16. Rs1.AddNew
  17.  
  18. Rs1!KantD_1 = UL_kantD1 '[ da se upiše ovdje kao yes/no]
  19.  
  20. Rs1.Update
  21. Rs1.Close
  22.  
  23. Set Baza = Nothing

kada je pokrenem dobivam grešku "Object Required"
Pozdrav
↑  ↓

#2 09.11.2011 11:16
zxz Van mreze
Administrator
Registrovan od:03.02.2009
Postovi:10,610


Predmet:Re: kako dimenzionirati varijablu Yes/No
Tesko je reci.
Set rsc = Nothing--->Neznam sta ti je ovo
Mozda neka global var
Ostali kod je uredu i trebalo bi da se upise ako postoji polje.
Sad je pitanje kakvo je polje D_l jer greska govori da je do njega.
Podrška samo putem foruma, jer samo tako i ostali imaju koristi od toga.
↑  ↓

#3 09.11.2011 11:47
pmiroslav Van mreze
Clan
Registrovan od:02.02.2009
Postovi:1,458


Predmet:Re: kako dimenzionirati varijablu Yes/No
Sada je proradilo, bila je greška u pisanju. Umjesto Rs1!KantD_1 napisao sam samo Rs!Kant_D_1

A ovo Set rsc= Nothing ni ja neznam Å¡to je. To sam imao u nakom primjeru na osnovu kojega radim funkciju pa sam prepisao. Sada sam to obrisao pa radi i bez toga.
Pozdrav
↑  ↓

Stranice (1):1


Sva vremena su GMT +01:00. Trenutno vrijeme: 4: 10 am.