Geschütztes VorButton1_Click (ByVal Absender als Gegenstand, ByVal e als EventArgs) behandelt Button1.Click
Lernabschnitt („SalesmanID“) = TextBox1.Text.ToUpper
TextBox2.Text = ""
Wenn cbBids.Checked dann
TextBox2.Text = „sotype = „B““
Beenden wenn
Wenn cbReturns.Checked dann
Wenn TextBox2.Text = "" dann
TextBox2.Text = „sotype = „R““
Sonst
TextBox2.Text = TextBox2.Text u. „oder sotype = „R““
Beenden wenn
Beenden wenn
Wenn cbPartial.Checked dann
Wenn TextBox2.Text = "" dann
TextBox2.Text = „sotype = „O““
Sonst
TextBox2.Text = TextBox2.Text u. „oder sotype = „O““
Beenden wenn
Beenden wenn
Wenn cbRegular.Checked dann
Wenn TextBox2.Text = "" dann
TextBox2.Text = „sotype = ''“
Sonst
TextBox2.Text = TextBox2.Text u. „oder sotype = ''“
Beenden wenn
Beenden wenn
Lernabschnitt („, was“) = TextBox2.Text
MsgBox (TextBox2.Text)
Response.Redirect („SOS.aspx“)
Enden-Unterseeboot
|