Cara Menyimpen tanda kutip(') di VB.Net

13.21 2 comments
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()

2 komentar:

  1. Dika25 Februari 2014 10.45

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

    BalasHapus
  2. Unknown2 Juli 2015 23.08

    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

    BalasHapus