Imports System.Data
Partial Class CustomerSurvey
Inherits System.Web.UI.Page
Dim dvTable As DataView
Protected Sub btnGetIncidents_Click(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles btnGetIncidents.Click
dvTable = CType(AccessDataSource1.Select( _
DataSourceSelectArguments.Empty), DataView)
dvTable.RowFilter = "CustomerID = " & txtCustomerID.Text _
& " And DateClosed Is Not Null"
If dvTable.Count > 0 Then
Me.DisplayClosedIncidents()
EnableControls(True) '
lstIncidents.Focus()
Else
lblNoIncidents.Text = "There are no incidents for that customer."
EnableControls(False)
End If
End Sub
Private Sub DisplayClosedIncidents()
lstIncidents.Items.Add(New ListItem("--Select an incident--", "None"))
For Each drvRow As DataRowView In dvTable
Dim incident As New Incident
incident.IncidentID = CInt(drvRow("IncidentID"))
incident.ProductCode = drvRow("ProductCode").ToString
incident.DateClosed = CDate(drvRow("DateClosed"))
incident.Title = drvRow("Title").ToString
lstIncidents.Items.Add(New ListItem( _
incident.CustomerIncidentDisplay, incident.IncidentID))
Next
lstIncidents.SelectedIndex = 0
lblNoIncidents.Text = ""
End Sub
Private Sub EnableControls(ByVal enable As Boolean)
lstIncidents.Enabled = enable
lblHeading.Enabled = enable
lblResponseTime.Enabled = enable
rblResponseTime.Enabled = enable
lblEfficiency.Enabled = enable
rblEfficiency.Enabled = enable
lblResolution.Enabled = enable
rblResolution.Enabled = enable
lblComments.Enabled = enable
txtComments.Enabled = enable
chkContact.Enabled = enable
rdoContactByEmail.Enabled = enable
rdoContactByPhone.Enabled = enable
btnSubmit.Enabled = enable
End Sub
Protected Sub btnSubmit_Click(ByVal sender As Object, _
ByVal e As System.EventArgs) Handles btnSubmit.Click
If Page.IsValid Then
Dim survey As New Survey
survey.CustomerID = txtCustomerID.Text
survey.IncidentID = lstIncidents.SelectedValue
If rblResponseTime.SelectedIndex <> -1 Then
survey.ResponseTime = rblResponseTime.SelectedValue
End If
If rblEfficiency.SelectedIndex <> -1 Then
survey.TechEfficiency = rblEfficiency.SelectedValue
End If
If rblresolution.SelectedIndex <> -1 Then
survey.Resolution = rblresolution.SelectedValue
End If
survey.Comments = txtComments.Text
If chkContact.Checked Then
survey.Contact = True
If rdoContactByEmail.Checked Then
survey.ContactBy = "Email"
Else
survey.ContactBy = "Phone"
End If
Session.Add("Contact", True)
Else
survey.Contact = False
Session.Add("Contact", False)
End If
'REDIRECT TO THE WEB PAGE SurveyComplete.aspx
Response.Redirect("SurveyComplete.aspx")
End If
End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
txtCustomerID.Focus()
End Sub
End Class
Help with a dataview grid
Page 1 of 11 Replies - 909 Views - Last Post: 14 September 2009 - 09:00 AM
#1
Help with a dataview grid
Posted 13 September 2009 - 08:30 AM
I'm not sure what all is needed but this is the code behind the design view for this page. Basically it works however when I start up the page instead of the dataview grid being empty until I run a customer ID, it instead shows the numbers 27,28,29 through 43. Then when I run my customerID number it still shows those numbers yet it also shows what it is supposed to below those numbers. I can't figure out where in the world these numbers are coming from when I run the page.
Replies To: Help with a dataview grid
#2
Re: Help with a dataview grid
Posted 14 September 2009 - 09:00 AM
If i had to guess, you are autofilling the grid....also, what are "27,28,29 through 43"? Sounds like those are page numbers. I would suggest attaching your Databinding operation to the "btnGetIncidents_Click" event, since it seems you want to fill the Grid once you input the customerID.
What i do is setup the Gridview columns only and then in my code pending on where i want the GV to populate, i then associate the respective BLL class to the Gridview. I am currently working on getting it to where i just simply place the Gridview and setup the columsn through the same BLL class so that way i just have to drag, drop, and maybe place the control on the page only.
What i do is setup the Gridview columns only and then in my code pending on where i want the GV to populate, i then associate the respective BLL class to the Gridview. I am currently working on getting it to where i just simply place the Gridview and setup the columsn through the same BLL class so that way i just have to drag, drop, and maybe place the control on the page only.
Page 1 of 1
|
|

New Topic/Question
Reply




MultiQuote




|