Button1_Click secundário protegido (remetente de ByVal como o objeto, ByVal e como EventArgs) segura Button1.Click
Sessão (“SalesmanID”) = TextBox1.Text.ToUpper
TextBox2.Text = ""
Se cbBids.Checked então
TextBox2.Text = “sotype = “B””
Terminar se
Se cbReturns.Checked então
Se TextBox2.Text = "" então
TextBox2.Text = “sotype = “R””
Mais
TextBox2.Text = TextBox2.Text & “ou sotype = “R””
Terminar se
Terminar se
Se cbPartial.Checked então
Se TextBox2.Text = "" então
TextBox2.Text = “sotype = “O””
Mais
TextBox2.Text = TextBox2.Text & “ou sotype = “O””
Terminar se
Terminar se
Se cbRegular.Checked então
Se TextBox2.Text = "" então
TextBox2.Text = “sotype = ''”
Mais
TextBox2.Text = TextBox2.Text & “ou sotype = ''”
Terminar se
Terminar se
Sessão (“que”) = TextBox2.Text
MsgBox (TextBox2.Text)
Response.Redirect (“SOS.aspx”)
Submarino da extremidade
|