Coba pake ini : DoCmd.OpenForm ''NAMA FORM'' acNormal
CMIIAW On 5/28/10, Asri Permatasari <[email protected]> wrote: > dear para master... > > aku punya source code....aku bingung dengan kata proses selanjutnya??? > bagaimana cara penulisannya jika kita ingin membuka form yang telah kita > buat, namanya form nya yaitu Mitra. > > > Private Sub > cmdlogin_Click() > Dim > db As Database > Dim rs As Recordset > Set db = CurrentDb() > Set rs = db.OpenRecordset("select * from tuser where > userid ='" & txtuser & "' and &_ > “pword ='" & txtpword & "'", dbOpenDynaset) > If rs.RecordCount > 0 Then > pesan = > MsgBox("Login Sukses", vbOKOnly, "Sukses") > ‘proses selanjutnya > Else > pesan = MsgBox("Login Gagal, > masukan userid dan password", vbOKOnly, "Gagal") > End IfEnd Sub > > ‘proses selanjutnya ‘proses selanjutnya > > > -- Ahmad Qomaruddin Sulang Rembang email : [email protected] blog : ud13en.blogspot.com ------------------------------------ SPAM IS PROHIBITEDYahoo! Groups Links <*> To visit your group on the web, go to: http://groups.yahoo.com/group/belajar-access/ <*> Your email settings: Individual Email | Traditional <*> To change settings online go to: http://groups.yahoo.com/group/belajar-access/join (Yahoo! ID required) <*> To change settings via email: [email protected] [email protected] <*> To unsubscribe from this group, send an email to: [email protected] <*> Your use of Yahoo! Groups is subject to: http://docs.yahoo.com/info/terms/
