Hello guys I have a problem with my current system.
things are working fine using this query in my forms.
Private Sub btnsearch_Click(sender As Object, e As EventArgs) Handles btnsearch.Click
'Dim connstr As String = "server=midtelephone\sqlexpress; database=testdb; user= sa; password=sa;"
Dim cmdconn2 = New SqlConnection
cmdconn2 = New SqlConnection
cmd = New SqlCommand
cmdconn2.ConnectionString = sqlstr
cmd.Connection = cmdconn2
cmdconn2.Open()
If CheckForText1() = False Then
MessageBox.Show("Cannot search with an empty value!")
frmVetsearch.Dispose()
Exit Sub
Else
cmd.CommandText = "select a.lname, a.fname, a.mi, a.vdms_no, b.lname, b.fname, b.mi, b.CLAIM_NO, c.ADDRESS1, c.ADDRESS2, c.ADDRESS3, c.sex, c.SCHOOL, c.C_YEAR, c.COURSE," & _
"c.telephone_no, c.mobile_no, c.email_add, c.EFFECTIVITY_DATE, c.SCC_NO, c.MLIST_NO, c.CATEGORY, c.DATE_FILED, c.relation_to_veteran, c.ENTITLEMENT_AWARD," & _
"c.REMARKS, c.UPDATED_BY, c.D_UPDATED from carlos.claims_veteran a left join carlos.claims_waivee b on a.vdms_no = b.vdms_no left join tobee.EBD_SCHBILLS c " & _
"on b.claim_no = c.CLAIM_NO where a.lname like '" + txtLname.Text + "%' and a.fname like '%" + txtFname.Text + "%' and a.mi like '%" + txtMi.Text + "%' " & _
"and a.VDMS_no like '" + txtVDMSNo.Text + "%'"
btnsearch.Enabled = False
btnSearchStud.Enabled = False
frmVetsearch.ShowDialog()
cmdconn.Close()
End If
End Sub
now, i'm trying to improve my system by transferring this query into a stored procedure. is there any possibility that i could that thing. if there is could you pls provide me a guide or a solution? Thanks In Advance :)