Database window kan bisa di hide di Startup, lalu special key dimatikan, dan don't allow full menus (menu windows dibuang/dimodify supaya tdk bisa unhide), jadi user tdk bisa access ke database window. jangan lupa juga menyembunyikan object2, lumayan utk menyulitkan :)
klo dilihat dari code nya, berarti pakai ADO, digunakan di ADP. Klo MDB perlu modifikasi spy bisa pakai DAO aja. Haer 2008/8/15 buday uhuy <[EMAIL PROTECTED]> > Iya..emang bener ngeselin tuch mas haer. Saya udah tidak mengaktifkan max > min button dan saya pake command untuk memaximizedkan form, tapi tetep aja > ada button restore windows itu. Jadi user bisa lihat database yg ada di > belakang form. Gimana cara user supaya ga bisa menyentuh database yang ada > di belakang form ? > > Trs, saya mo ngerepotin lagi nih teman2. Saya ambil sintak dari bukunya mas > haer, saya rubah dikit supaya text box menampilkan kodepart secara otomatis > (P00000001, P00000002, P00000003,......dst). Tapi ada error : "sub or > function not defined", salahnya dimana ya ? Ada teman2 yang bisa membantu ? > > aw = "P" > tSQL = "SELECT MAX(kodepart) FROM TBLPart" > Dim rs As ADODB.Recordset > Set rs = New ADODB.Recordset > rs.CursorType = adOpenStatic > rs.CursorLocation = adUseClient > rs.Source = tSQL > rs.ActiveConnection = CurrentProject.AccessConnection > rs.Open > If Not rs.EOF Then > If Not IsNull(rs!kodepart) Then > kodepart = rs!kodepart > aw = Left(kodepart, besar(Len(kodepart)) - 8, 0) > Else > kodepart = aw & "00000000" > End If > Else > kodepart = aw & "00000000" > End If > > rs.Close > nobaru = Val(Right(kodepart, 8)) + 1 > kdbaru = Right(Str(nobaru + 100000000), 8) > Me.kodepart = aw + kdbaru > > Sebelumnya terima kasih buat bantuan teman2. > > Wassalamu'alaikum. wr. wb. > ----- Original Message ---- > From: Haer Talib <[EMAIL PROTECTED]> > To: [email protected] > Sent: Friday, August 15, 2008 10:02:08 > Subject: Re: [belajar-access] Restore Windows button > > Kalau mengaktifkan max button, maka restore otomatis ikut. > kalau mau, max min buttons tdk diaktifkan saja, maximize lewat vba. > tapi ada sedikit keanehan pada access, kadang2 muncul button restore di > baris menu/toolbar. ngeselin emang :) > solusi apa boleh buatnya memanfaatkan OnClick pada form/detail, atau pada > form activate, yang otomatis memaximizekan form kembali :) > > Haer > > > 2008/8/13 buday uhuy <herr_haikal@ yahoo.com <[EMAIL PROTECTED]>> > >> Assalamu'alaikum teman2 accesser, >> >> Langsung aja, project .adp saya sudah jadi, tapi masih ada hal yang >> mengganggu: >> bagaimana cara menghilangkan button restore windows yang ada di sebelah >> kanan atas form? soalnya saya membuat semua form menjadi maximized, tapi >> kenapa masih ada juga button restore windows ? >> >> Mungkin teman2 ada yang bisa membantu ? Sebelumnya terima kasih u/ bantuan >> dari teman2 semua. >> >> Wassalamu'alaikum. >> >> Budi >> >> Send instant messages to your online friends http://uk.messenger >> .yahoo.com <http://uk.messenger.yahoo.com> >> > > > > -- > [Haer Talib] > MVP Office Access > Meet me at www.RumahAccess. com <http://www.RumahAccess.com> > > => > > > Send instant messages to your online friends http://uk.messenger.yahoo.com > > -- [Haer Talib] MVP Office Access Meet me at www.RumahAccess.com =>
