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>: 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> 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 =>
