Click here to Skip to main content

ASP.NET

sory sir i was out some where. my code behind file is here
Protected Sub btnSearch_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSearch.Click
Try
If (Conn.State <> ConnectionState.Open) Then
Conn.Open()
End If
If drpSelect.SelectedIndex = 1 Then
SelectQuery = "SELECT cust_order.order_id as order_id,customers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers where customers.customer_id=cust_order.customer_id and customers.fname like '%" & txtSearch.Text & "%'"
End If
If drpSelect.SelectedIndex = 2 Then
SelectQuery = "SELECT cust_order.order_id as order_id,customers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers where customers.customer_id=cust_order.customer_id and customers.lname like '%" & txtSearch.Text & "%'"
End If
If drpSelect.SelectedIndex = 3 Then
SelectQuery = "SELECT cust_order.order_id as order_id,customers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers where customers.customer_id=cust_order.customer_id and cust_order.order_id = " & txtSearch.Text & ""
End If
If drpSelect.SelectedIndex = 4 Then
SelectQuery = "SELECT cust_order.order_id as order_id,customers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers where customers.customer_id=cust_order.customer_id and customers.customer_id = " & txtSearch.Text & ""
End If
If drpSelect.SelectedIndex = 5 Then
SelectQuery = "SELECT cust_order.order_id as order_id,customers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers where customers.customer_id=cust_order.customer_id and customers.zipcode ='" & txtSearch.Text & "'"
End If
If drpSelect.SelectedIndex = 6 Then
SelectQuery = "SELECT cust_order.order_id as order_id,customers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers,biz_cust_extra where customers.customer_id=cust_order.customer_id and customers.customer_id=biz_cust_extra.customer_id and biz_cust_extra.comp_name like '%" & txtSearch.Text & "%'"
End If
If drpSelect.SelectedIndex = 7 Then
SelectQuery = "SELECT cust_order.order_id as order_id,customers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers where customers.customer_id=cust_order.customer_id and cust_order.trans_status = 0"
End If
If drpSelect.SelectedIndex = 8 Then
SelectQuery = "SELECT cust_order.order_id as order_id,cutomers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers where customers.customer_id=cust_order.customer_id and cust_order.trans_status = 0 and customers.fname like '%" & txtSearch.Text & "%'"
End If
If drpSelect.SelectedIndex = 9 Then
SelectQuery = "SELECT cust_order.order_id as order_id,customers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers where customers.customer_id=cust_order.customer_id and cust_order.trans_status = 0 and customers.lname like '%" & txtSearch.Text & "%'"
End If
If drpSelect.SelectedIndex = 10 Then
SelectQuery = "SELECT cust_order.order_id as order_id,customers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers where customers.customer_id=cust_order.customer_id and cust_order.trans_status = -1"
End If
If drpSelect.SelectedIndex = 11 Then
SelectQuery = "SELECT cust_order.order_id as order_id,customers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers where customers.customer_id=cust_order.customer_id and cust_order.trans_status = -1 and customers.fname like '%" & txtSearch.Text & "%'"
End If
If drpSelect.SelectedIndex = 12 Then
SelectQuery = "SELECT cust_order.order_id as order_id,customers.fname as fname , customers.lname as lname, cust_order.order_date as order_date,cust_order.order_status as order_status from cust_order,customers where customers.customer_id=cust_order.customer_id and cust_order.trans_status = -1 and customers.lname like '%" & txtSearch.Text & "%'"
End If

selectcommand = New OleDbCommand()
selectcommand2 = New OleDbCommand(SelectQuery, Conn)
total = selectcommand2.ExecuteReader()
If Not total.Read() Then
lblMsg.Visible = True
Else
lblMsg.Visible = False
End If
With selectcommand
.Connection = Conn
.CommandText = SelectQuery
.CommandType = CommandType.Text
End With
adapter = New OleDbDataAdapter
adapter.SelectCommand = selectcommand
dset = New DataSet("quote")
adapter.Fill(dset, "quote")
orderDG.DataSource = dset
orderDG.DataBind()
txtSearch.Text = ""
drpSelect.SelectedIndex = 0
btnBack.Visible = True
totalreclbl.Text = dset.Tables(0).Rows.Count
Catch ex As Exception
Response.Write(ex.ToString)
Finally
Conn.Close()
End Try
End Sub

General News Suggestion Question Bug Answer Joke Praise Rant Admin

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.