aslm komunitas accesss
saya mengemui kendala dalam input data tanggal dengan menggunakan sql mohon pencerahan dalam memasuknan tanggal Pendirian
mis
Private Sub CmdSimpan_Click()
Call koneksi
Dim sql As String
sql = "insert into Sekolah (sek_NSS,Sek_UNIK,Sek_Tis_Kode,Sek_Nama,Sek_Status,Sek_NamaPimpinan," _
& " Sek_Tgl_Pedirian) values ('" & TextNPSN & "','" & TextNSS & _
"','" & cbmTingkat & _
"','" & TextSekolah & _
"','" & cmbStatus & _
"','" & TextPimpinan & _
"','" & TextTgl_Pedirian& "')"
Dim sql As String
sql = "insert into Sekolah (sek_NSS,Sek_UNIK,Sek_Tis_Kode,Sek_Nama,Sek_Status,Sek_NamaPimpinan," _
& " Sek_Tgl_Pedirian) values ('" & TextNPSN & "','" & TextNSS & _
"','" & cbmTingkat & _
"','" & TextSekolah & _
"','" & cmbStatus & _
"','" & TextPimpinan & _
"','" & TextTgl_Pedirian& "')"
conn.Execute sql
Call bersih
Call Blank
End Sub
Call bersih
Call Blank
End Sub
zakirnas
__._,_.___
| Reply via web post | Reply to sender | Reply to group | Start a New Topic | Messages in this topic (7) |
SPAM IS PROHIBITED
.
__,_._,___
Tidak ada komentar:
Posting Komentar