Saturday, 27 July 2013

Cara Menyimpen tanda kutip(') di VB.Net

Berikut adalah codingan cara menyimpen tanda kutip(') di vb.net atau visual studio 2010

 Public Function SQLdenganKutip(ByVal sText)
        Dim sTemp
        If Not IsNothing(sText) Then sTemp = Replace(sText, "'", "''")
        SQLdenganKutip = sTemp
    End Function
   
Lalu taro fungsi sqldengankutip seperti codingan yang berwarna merah .

            Dim bb As String

            bb = "Insert into tamu " & _
                 "( kode_tamu " & _
            ",No_kartuidentitas " & _
",Nama_tamu " & _
                  ",Kewarganegaraan) " & _
                  " Values " & _
                  " ('" & txtkodetamu.Text & "' " & _
            " ,'" & txtnoktp.Text & "' " & _
                  " ,'" & SQLdenganKutip(txtnamalengkap.Text) & "' " & _
                  " ,'" & txtkewarganegaraan.Text & "') "
            cmd = New OleDb.OleDbCommand(bb, conn)
            cmd.ExecuteNonQuery()
            cmd.Dispose()


Perhatian: Yuk Baca Artikel bagus di Nurul Musthofa

Artikel Terkait

2 comments:

  1. di vb 2008 gmana?
    error pas Replace(sText, "'", "''")
    expression does not produce a value

    ReplyDelete
  2. Saya tertarik dengan tulisan anda mengenai Teknologi. Teknologi merupakan suatu ilmu yang sedang berkembang di zaman yang sudah maju sekarang ini. Saya memiliki beberapa tulisan sejenis mengenai Teknologi yang dapat dilihat di www.ejournal.gunadarma.ac.id

    ReplyDelete

 

Network

Pesan

Semoga situs ini bermanfaat