Frågan#1
hej hej hej
Då var det dags för en Newbie historia igen...
Roddar runt i SQLCommand / SqlAdapter just nu.
Håller på att bygga en gästbok som upplärningsprojekt. Så nu är jag ute efter att
köra en "INSERT INTO" variant via SQLCommand / SqlAdapter + - det som nu kan
behövas.
*************************************************************************************
Miljö:
SqlServer2003, V.Studio 2003
*************************************************************************************
Formuläret innehåller ett textfält och en sparaknapp (för att skapa en ny gästbok).
*************************************************************************************
Sen har jag via "Server Explorer" fått fram följande autogenererade kod:
'This call is required by the Web Form Designer.
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
Me.SqlDataAdapter1 = New System.Data.SqlClient.SqlDataAdapter
Me.SqlInsertCommand1 = New System.Data.SqlClient.SqlCommand
Me.SqlConnection1 = New System.Data.SqlClient.SqlConnection
Me.SqlSelectCommand1 = New System.Data.SqlClient.SqlCommand
'
'SqlDataAdapter1
'
Me.SqlDataAdapter1.InsertCommand = Me.SqlInsertCommand1
Me.SqlDataAdapter1.SelectCommand = Me.SqlSelectCommand1
Me.SqlDataAdapter1.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "tblGuestbook", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("AddBy", "AddBy"), New System.Data.Common.DataColumnMapping("AddDate", "AddDate"), New System.Data.Common.DataColumnMapping("LangID", "LangID"), New System.Data.Common.DataColumnMapping("Guestbook", "Guestbook"), New System.Data.Common.DataColumnMapping("Active", "Active")})})
'
'SqlInsertCommand1
'
Me.SqlInsertCommand1.CommandText = "INSERT INTO tblGuestbook (AddBy, AddDate, Guestbook, Active, LangID) VALUES (@Add" & _
"By, @AddDate, @Guestbook, @Active,)"
Me.SqlInsertCommand1.Connection = Me.SqlConnection1
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@AddBy", System.Data.SqlDbType.Int, 4, "AddBy"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@AddDate", System.Data.SqlDbType.DateTime, 8, "AddDate"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@LangID", System.Data.SqlDbType.Int, 4, "LangID"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Guestbook", System.Data.SqlDbType.VarChar, 255, "Guestbook"))
Me.SqlInsertCommand1.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Active", System.Data.SqlDbType.TinyInt, 1, "Active"))
'
'SqlConnection1 instansieras
'
Me.SqlConnection1.ConnectionString = "workstation id=""id"";packet size=4096;user id=whatever;data source=anywhere;persist sec" & _
"urity info=True;initial catalog=EnKatalog;password=femetta51!?"
'
'SqlSelectCommand1
'
Me.SqlSelectCommand1.CommandText = "SELECT AddBy, AddDate, LangID, Guestbook, Active FROM tblGuestbook"
Me.SqlSelectCommand1.Connection = Me.SqlConnection1
End Sub
Protected WithEvents txtGbook As System.Web.UI.WebControls.TextBox
Protected WithEvents SqlDataAdapter1 As System.Data.SqlClient.SqlDataAdapter
Protected WithEvents SqlSelectCommand1 As System.Data.SqlClient.SqlCommand
Protected WithEvents SqlInsertCommand1 As System.Data.SqlClient.SqlCommand
Protected WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection
Protected WithEvents Published As System.Web.UI.WebControls.CheckBox
Protected WithEvents SaveBtn As System.Web.UI.WebControls.Button
Sen har jag följande kod under knapphändelsen:
Private Sub SaveBtn_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles SaveBtn.Click
'Testing testing te... :)
'(Långt senare...)efter X antal misslyckade försök och googlande etc... :l
'Insikt: Jag har uppenbarligen inte en susning... :r
'Lösningar:
'1. Gör en gammal hederlig vanlig variant... "LOOSERTRAP" :bla
'2. Fråga de obotliga snillena på wF :h
'Slutsats: Gå på lösningsalternativ 2 :i
' Tack för din tid & hjälp :bire
End Sub