Gunakan MimeTex/LaTex untuk menulis simbol dan persamaan matematika.

Welcome to Forum Sains Indonesia. Please login or sign up.

Agustus 09, 2022, 11:45:38 PM

Login with username, password and session length

Topik Baru

Artikel Sains

Anggota
  • Total Anggota: 26,760
  • Latest: Hormide
Stats
  • Total Tulisan: 139,633
  • Total Topik: 10,390
  • Online today: 88
  • Online ever: 441
  • (Desember 17, 2011, 09:48:51 AM)
Pengguna Online
Users: 0
Guests: 33
Total: 33

Aku Cinta ForSa

ForSa on FB ForSa on Twitter

error simpan data

Dimulai oleh fathian, Juli 08, 2017, 11:19:33 AM

« sebelumnya - berikutnya »

0 Anggota dan 1 Pengunjung sedang melihat topik ini.

fathian

For i = 1 To xRow - 1
    With Grid
       SQL = ""
        SQL = "Insert Into defektaobatdet_far Values('" & Trim(TxtNobuktiDefekta.Text) & "','" _
            & .TextMatrix(i, 1) & "','" _
            & .TextMatrix(i, 8) & "','" _
            & "" & "','" _
            & .TextMatrix(i, 5) & "')"
    End With
    koneksi.Execute SQL, , adCmdText
Next i