Bisa dari MDB yang lain. Tapi tekniknya sebaiknya tdk di-share! Haer
2008/7/22 harry siswanto <[EMAIL PROTECTED]>: > ikutan Nimbrung > > > > nah untuk mengembalikan lagi caranya gimana ?? > > apa bisa dari MDB yg lain ?? > > atau .....???? > > > > --- On *Tue, 7/22/08, Haer Talib <[EMAIL PROTECTED]>* wrote: > > From: Haer Talib <[EMAIL PROTECTED]> > Subject: Re: [belajar-access] Re: Disable tombol shift (Maaf saya lupa) > To: [email protected] > Date: Tuesday, July 22, 2008, 12:43 PM > > Coba masukkan code berikut ini pada sebuah module umum (create new > module kalau perlu). > > Function ChangeProperty( strPropName As String, varPropType As Variant, > varPropValue As Variant) As Integer > Dim dbs As Object, prp As Variant > Const conPropNotFoundErro r = 3270 > Set dbs = CurrentDb > On Error GoTo Change_Err > ' > dbs.Properties( strPropName) = varPropValue > ChangeProperty = True > > Change_Bye: > Exit Function > > Change_Err: > If Err = conPropNotFoundErro r Then ' Property not found. > > Set prp = dbs.CreateProperty( strPropName, varPropType, > varPropValue) > dbs.Properties. Append prp > Resume Next > Else > ' Unknown error. > ChangeProperty = False > Resume Change_Bye > End If > End Function > > > lalu eksekusi perintah: > > ChangeProperty "AllowBypassKey", DB_BOOLEAN, False > > bisa di immediate window atau taruh dalam sub lalu jalankan/call sub nya > > CUATION! > Kalau anda menjalankan perintah di atas, maka SHIFT akan lumpuh pada waktu > buka MDB berikutnya, anda bisa lock out. > Buat backup MDB anda sebelum menjalankannya. > > Salam, > Haer Talib > > > 2008/7/21 Rosana Dewi <rosana.dewi@ gmail.com <[EMAIL PROTECTED]>>: > >> Dear Mas Mas yang udah bantuin, sebelumnya saya ucapin makasih..saya >> udah coba tapi kok ngga mau ya...?? >> Saya coba saran dari Mas Sws_Sby, sesuai dengan yang ditulis di-email, >> tapi shift keynya masih berfungsi dan database window masih bisa >> diexplorasi. >> >> Saya juga coba saran dari Mas Soffan...tapi kok malah error..mungkin saya >> kurang bisa menempatkan codingnya ke module atau kurang bisa bikin macronya. >> >> >> Mas bisa ngga bikin mdb sederhana (1 table, 1 form sebagai contoh >> penggunaannya) . >> >> Beribu maaf mas...telah ngerepotin. >> >> Terima kasih >> Dewi >> >> >> >> >> On 7/20/08, Rosana Dewi <rosana.dewi@ gmail.com <[EMAIL PROTECTED]>> >> wrote: >>> >>> Dear para pakar, >>> >>> Saya pernah baca artikel ini dibahas di forum, cuman saya udah ngga >>> ketemu lagi nyarinya..bantuin dong. >>> >>> Gimana caranya biar user tidak bisa mencegah start up dengan menekan >>> tombol shift pada saat buka program. Karena log in screen yg saya bikin jadi >>> di skip dan user bisa dengan leluasa obok2 database window saya. >>> >>> Please help ya... >>> >>> Terima kasih banyak sebelumnya >>> Dewi >>> >>> >>> >> >> > > > -- > [Haer Talib] > Office Access MVP > Meet me at www.RumahAccess. com <http://www.rumahaccess.com/> > > => > > > > -- [Haer Talib] Office Access MVP Meet me at www.RumahAccess.com =>
