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

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 AKSES = "1" Else AKSES = "0" End If 'Class Proses DML (Simpan Data) xSIMPAN.SIMPAN_AKSES(Y, DGVSample.Rows(iROW).Cells(1).Value, AKSES) N

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

LDAP In VB.Net

hey there friends, here is this i would like to share another simple code in developing an application in VB.Net by now i would like to share how the way to use a LDAP (Lightweight Directory Access Protocol). at the time i need to develop a system which needs to use login user using domain user (ex: peoplename@company.co.id) no longer using user level in database. it is so confused to me to make it real at the time, because i never make it before. but this is the way how i make it happened. just make a simple form as below : next level : add another reference in your visual studio project (System.DirectoryService.dll) next : make a new class Imports System Imports System.Text Imports System.Collections Imports System.Security.Principal Imports System.DirectoryServices Public Class LDAPControlClass Private NamaDomain As String = "company.co.id" Private MemberOf As New List(Of String) Public Function LoginLDAP(ByVal Username

OPRAG-OPREG

Search This Blog