vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Brandneu! sevEingabe v3.0 - Das Eingabecontrol der Superlative!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

ASP.NET, WebServices u. Remoting
Re: Insert Command SQL Stapel 
Autor: SpaXX2
Datum: 26.03.06 21:51

Protected Sub btnSave_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnSave.Click
Dim sqlPraefInsert As String = "INSERT INTO [tab_PräfPlatz] (Präferenzen_Id,Platz_Id,Präf) VALUES(@PraefId, @PlatzId, @Präf);"
Dim cmdPraefInsert As New Data.OleDb.OleDbCommand(sqlPraefInsert, conn)

Dim PraefIDs() As Integer = New Integer(17) {rbl1.SelectedIndex, rbl2.SelectedIndex, rbl2.SelectedIndex, rbl3.SelectedIndex, rbl4.SelectedIndex, rbl5.SelectedIndex, rbl6.SelectedIndex, rbl7.SelectedIndex, rbl8.SelectedIndex, rbl9.SelectedIndex, rbl10.SelectedIndex, rbl11.SelectedIndex, rbl12.SelectedIndex, rbl13.SelectedIndex, rbl14.SelectedIndex, rbl15.SelectedIndex, rbl16.SelectedIndex, rbl17.SelectedIndex}

Dim k As Integer = 1
Do Until k = 18
cmdPraefInsert.Parameters.AddWithValue("PraefId", k)
cmdPraefInsert.Parameters.AddWithValue("PlatzId", CInt(txtPlatzID.Text))
cmdPraefInsert.Parameters.AddWithValue("Praef", PraefIDs(k))
cmdPraefInsert.ExecuteNonQuery()
k += 1
Loop
Response.Redirect("ambstart.aspx", True)
End Sub
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Insert Command SQL Stapel1.021SpaXX226.03.06 21:37
Re: Insert Command SQL Stapel670SpaXX226.03.06 21:51
So gehts oder löschen625SpaXX227.03.06 07:53
Re: So gehts oder löschen642ModeratorFZelle27.03.06 08:54

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel