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>
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
--
[Haer Talib]
MVP Office Access
Meet me at www.RumahAccess. com
=>
Send instant messages to your online friends http://uk.messenger.yahoo.com