How To Handling Quote (') In VB.Net

hi there
here i will share the way to handle quote (') during coding with VB.Net
sometimes we will have data such as (MAT'L) that quote is definitely forbidden when we are use the data.

create a function as below :
Public Function Ganti(ByVal Kata As String) As String
        Ganti = Replace(Kata, "'", "''")
    End Function

and here is this how you gonna use that function, read carefully

Public Sub InsertDataDefect(ByVal Row As Integer)
        Dim DefectName As String = dgvInputBMISDetail.Rows(Row).Cells("dgvInputBMISDetailDefectName").Value.ToString
        Koneksi()
        cmd = New SqlCommand("SELECT * FROM dbo.mstDEFECT WHERE (ActiveTo IS NULL) AND DefectName='" & Ganti(DefectName) & "'", Conn)
        rd = cmd.ExecuteReader
        rd.Read()
        If rd.HasRows Then
            With dgvInputBMISDetail
                .Rows(Row).Cells("dgvInputBMISDetailRecNoDefect").Value = rd.Item("AutoRecordNoDefect")
                .Rows(Row).Cells("dgvInputBMISDetailDefectNo").Value = rd.Item("DefectNo")

            End With
        End If
        Conn.Close()
    End Sub

Comments

VS2015 using Bootstrap

this is how you gonna do that.. yes it is sometimes learning using tutorial book makes us boring.. so this tutorial is how to make it simple but very useful in understanding Tutorial To Download

CheckBox dalam DataGridView VB.Net

Pada saat membuat aplikasi (VB.Net) untuk materi skripsi, terbesit bagaimana cara baru untuk memberikan hak akses user secara dinamis pada sistem. setelah dicoba dengan tanya-tanya. akhirnya bisa mendapatkan cara itu... wah sesuatu banget dah.... inti dari posting ini hanya pada barisan kode berikut : Private Sub BtnSIMPAN_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnSIMPAN.Click Dim Y As String = Mid(CmbUSER.Text, 1, 7) Dim iROW As Integer Dim AKSES As String For iROW = 0 To DGVSample.Rows.Count - 1 'AksesBox = Nama CheckBox yang ada di DatagridView If DGVSample.Rows(iROW).Cells("AksesBox").Value Then ...

Catch Digit Before Specific Symbol (Desc "-") Using VB.Net 2010

This is the way how to catch digit before a specific symbol, for this case the symbol means (desc "-"). situation would be as follows : "XXXXX-NAME" we would need to catch all "X" before desc "-", so value would be "XXXXX". even "X" is only 4 digits or more less we will get that all digit. VB Script would be as below to support our case : Click below picture for more clear preference

OPRAG-OPREG

Search This Blog