Jim
The only code i added was (which disappeared every so often):
(System.Configuration.ConfigurationSettings.AppSet tings.Get("ConnectionS
tring"))
on the end of:
Me.WizConnection = New System.Data.SqlClient.SqlConnection
occasionally the complete line would disappear..
Here is the code which was generated after using the Adapter and
Connection wizards:
#Region " Web Form Designer Generated Code "
'This call is required by the Web Form Designer.
<System.Diagnostics.DebuggerStepThrough()> Private Sub
InitializeComponent()
Me.WizDataAdapter = New System.Data.SqlClient.SqlDataAdapter
Me.SqlInsertCommand1 = New System.Data.SqlClient.SqlCommand
Me.WizConnection = New
System.Data.SqlClient.SqlConnection(System.Configu ration.ConfigurationSe
ttings.AppSettings.Get("ConnectionString"))
Me.SqlSelectCommand1 = New System.Data.SqlClient.SqlCommand
'
'WizDataAdapter
'
Me.WizDataAdapter.InsertCommand = Me.SqlInsertCommand1
Me.WizDataAdapter.SelectCommand = Me.SqlSelectCommand1
Me.WizDataAdapter.TableMappings.AddRange(New
System.Data.Common.DataTableMapping() {New
System.Data.Common.DataTableMapping("Table", "tblResults", New
System.Data.Common.DataColumnMapping() {New
System.Data.Common.DataColumnMapping("ID", "ID"), New
System.Data.Common.DataColumnMapping("Line", "Line"), New
System.Data.Common.DataColumnMapping("LogDate", "LogDate"), New
System.Data.Common.DataColumnMapping("IneffExclEng aged",
"IneffExclEngaged"), New System.Data.Common.DataColumnMapping("Engaged",
"Engaged"), New System.Data.Common.DataColumnMapping("Offered",
"Offered"), New System.Data.Common.DataColumnMapping("Answered",
"Answered"), New System.Data.Common.DataColumnMapping("Answered30s" ,
"Answered30s"), New System.Data.Common.DataColumnMapping("Abandoned",
"Abandoned"), New System.Data.Common.DataColumnMapping("Abandoned30s ",
"Abandoned30s"), New
System.Data.Common.DataColumnMapping("ServiceLevel Ratio",
"ServiceLevelRatio"), New
System.Data.Common.DataColumnMapping("IneffectiveR atio",
"IneffectiveRatio"), New
System.Data.Common.DataColumnMapping("EngagedRatio ", "EngagedRatio"),
New System.Data.Common.DataColumnMapping("AbandonedRat io",
"AbandonedRatio")})})
'
'SqlInsertCommand1
'
Me.SqlInsertCommand1.CommandText = "INSERT INTO tblResults(ID, Line,
LogDate, IneffExclEngaged, Engaged, Offered, Ans" & _
"wered, Answered30s, Abandoned, Abandoned30s, ServiceLevelRatio,
IneffectiveRatio" & _
", EngagedRatio, AbandonedRatio) VALUES (@ID, @Line, @LogDate,
@IneffExclEngaged," & _
" @Engaged, @Offered, @Answered, @Answered30s, @Abandoned,
@Abandoned30s, @Servic" & _
"eLevelRatio, @IneffectiveRatio, @EngagedRatio, @AbandonedRatio);
SELECT ID, Line" & _
", LogDate, IneffExclEngaged, Engaged, Offered, Answered,
Answered30s, Abandoned," & _
" Abandoned30s, ServiceLevelRatio, IneffectiveRatio, EngagedRatio,
AbandonedRatio" & _
" FROM tblResults"
Me.SqlInsertCommand1.Connection = Me.WizConnection
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@ID", System.Data.SqlDbType.Int, 4,
"ID"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Line",
System.Data.SqlDbType.VarChar, 100, "Line"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@LogDate",
System.Data.SqlDbType.DateTime, 8, "LogDate"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@IneffExclEnga ged",
System.Data.SqlDbType.Int, 4, "IneffExclEngaged"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Engaged",
System.Data.SqlDbType.Int, 4, "Engaged"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Offered",
System.Data.SqlDbType.Int, 4, "Offered"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Answered",
System.Data.SqlDbType.Int, 4, "Answered"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Answered30s",
System.Data.SqlDbType.Int, 4, "Answered30s"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Abandoned",
System.Data.SqlDbType.Int, 4, "Abandoned"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Abandoned30s" ,
System.Data.SqlDbType.Int, 4, "Abandoned30s"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@ServiceLevelR atio",
System.Data.SqlDbType.Int, 4, "ServiceLevelRatio"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@IneffectiveRa tio",
System.Data.SqlDbType.Int, 4, "IneffectiveRatio"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@EngagedRatio" ,
System.Data.SqlDbType.Int, 4, "EngagedRatio"))
Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@AbandonedRati o",
System.Data.SqlDbType.Int, 4, "AbandonedRatio"))
'
'SqlSelectCommand1
'
Me.SqlSelectCommand1.CommandText = "SELECT ID, Line, LogDate,
IneffExclEngaged, Engaged, Offered, Answered, Answered3" & _
"0s, Abandoned, Abandoned30s, ServiceLevelRatio, IneffectiveRatio,
EngagedRatio, " & _
"AbandonedRatio FROM tblResults"
Me.SqlSelectCommand1.Connection = Me.WizConnection
End Sub
Protected WithEvents lbl7 As System.Web.UI.WebControls.Label
Protected WithEvents cmdUpdate As System.Web.UI.WebControls.Button
Protected WithEvents cmdEdit As System.Web.UI.WebControls.Button
Protected WithEvents cmdPrevious As System.Web.UI.WebControls.Button
Protected WithEvents Label3 As System.Web.UI.WebControls.Label
Protected WithEvents Label2 As System.Web.UI.WebControls.Label
Protected WithEvents Label1 As System.Web.UI.WebControls.Label
Protected WithEvents txtC7 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtB7 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtA7 As System.Web.UI.WebControls.TextBox
Protected WithEvents lbl5 As System.Web.UI.WebControls.Label
Protected WithEvents lbl4 As System.Web.UI.WebControls.Label
Protected WithEvents lbl6 As System.Web.UI.WebControls.Label
Protected WithEvents lbl1 As System.Web.UI.WebControls.Label
Protected WithEvents lbl3 As System.Web.UI.WebControls.Label
Protected WithEvents lbl2 As System.Web.UI.WebControls.Label
Protected WithEvents txtA1 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtC6 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtA6 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtB6 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtC5 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtB5 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtA5 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtB4 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtC2 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtB2 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtA3 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtA2 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtC4 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtC3 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtC1 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtB3 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtA4 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtB1 As System.Web.UI.WebControls.TextBox
Protected WithEvents cmdNext As System.Web.UI.WebControls.Button
Protected WithEvents WizDataAdapter As
System.Data.SqlClient.SqlDataAdapter
Protected WithEvents SqlSelectCommand1 As
System.Data.SqlClient.SqlCommand
Protected WithEvents SqlInsertCommand1 As
System.Data.SqlClient.SqlCommand
Protected WithEvents WizConnection As
System.Data.SqlClient.SqlConnection
Protected WithEvents txtDate1 As System.Web.UI.WebControls.TextBox
Protected WithEvents txtDate2 As System.Web.UI.WebControls.TextBox
Protected WithEvents cmdAdd As System.Web.UI.WebControls.Button
'NOTE: The following placeholder declaration is required by the Web
Form Designer.
'Do not delete or move it.
Private designerPlaceholderDeclaration As System.Object
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Init
'CODEGEN: This method call is required by the Web Form Designer
'Do not modify it using the code editor.
InitializeComponent()
End Sub
#End Region
*** Sent via Developersdex
http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!