untuk menghilangkan pesan warning diantara docmd.runsql, perlu di apit:
docmd.setwarnings false
docmd.runsql ...
docmd.setwarnings true
regards,
Sumiyanto
On Wed Jul 28th, 2010 4:55 PM ICT erna yanti wrote:
>Dear All,
>
>saya py sedikit kendala ni.........
>
>Seluruh tabel sudah saya pindahkan ke .adp lalu saya buat link odbc ke .mdb
>(spy
>tidak perlu dirubah lg querynya). masalahnya adalah setiap kali log in atau
>close (terutama yg ada rekamlog), selalu muncul layar konfirmasi : You Are
>About
>Append 1 row (s), dan pilihan Yes atau No
>
>kalo dipilih Yes, maka tabel TLog akan terisi, sedangkan jika dipilih No,
>tabel
>TLog tidak terisi dan muncul pesan Debug.
>
>berikut procedure RekamLog yg saya buat :
>
>Sub RekamLog(Optional act As String = "", Optional uid As String)
>If Kosong(uid) Then uid = VUserName
>winUserName = Environ("USERNAME")
>winComputerName = Environ("USERDOMAIN")
>tsql = "INSERT INTO tbl_Log " & "(UserName, Activity, lComputerName,
>lUserName)"
>& "VALUES ('" & uid & "', '" & act & "', '" & winComputerName & "', '" &
>winUserName & "')"
>DoCmd.RunSQL tsql
>End Sub
>
>
>Pertanyaannya : Bagaimana caranya supaya tabel TLog terisi tanpa perlu memilih
>Yes dan layar konfirmasi tersebut tidak muncul.
>
>thanks buat yg bersedia membantu......
>
>Erna
>
>
>
