Fråga : vad kontrollerades

I förmiddag using VB.Net och mig har en sida som har 2 som, text boxas, och 4 text för kontrollen boxes.

The första boxas är för representantLEGITIMATIONEN, och kontrollen boxas är för de olika typerna av beställer.
Bid, stamgästen, backorderen och returns.
the understöder text boxas är det van vid lagret info om som boxas var checked.

I önskar att passera, som boxas via perioden var till en sql-query. Mitt problem är formatera av sql-queryen beroende av som, Och I-förmiddagen inte sure hur man ändrar detta så det ska perioden för handtag Button1.Click

för work.

skyddade underButton1_Click (den ByVal avsändaren som anmärker, ByVal e som EventArgs) (”SalesmanID”) = TextBox1.Text.ToUpper
, om cbBids.Checked Then
TextBox2.Text = ”sotype = ”
för den b-” ”
avslutar If

, om cbReturns.Checked Then
TextBox2.Text = TextBox2.Text &” eller sotype = ”r-” ”
avslutar If

, om cbPartial.Checked Then
TextBox2.Text = TextBox2.Text &” eller sotype = ”nollan” ”avslutar If

om cbRegular.Checked Then
TextBox2.Text = TextBox2.Text &” eller sotype = '' ”
avslutar den If

perioden (”vad”) =

för

Response.Redirect (”SOS.aspx” för TextBox2.Text
MsgBox (TextBox2.Text)) avslutar Sub


Here är min sono för query
SELECT, sodate, ordate, custnoen, shpamt, ponumen, sotype, ordamt, salesmn FRÅN somast VAR (salesmn = @SalesmanID) OCH (sostat<> ”C”) OCH (sostat<> ”V”) OCH (sotype = @what) BESTÄLLA VID sotype
 " klar "

Svar : vad kontrollerades

Försök detta:
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:

    Skyddade underhandtag Button1.Click för Button1_Click (den ByVal avsändaren som anmärker, ByVal e som EventArgs)

        Period (”SalesmanID”) = TextBox1.Text.ToUpper
        TextBox2.Text = "",
        Om cbBids.Checked därefter
            TextBox2.Text = ”sotype = ”B””,
        Avsluta om

        Om cbReturns.Checked därefter
            Om TextBox2.Text = "" därefter
                TextBox2.Text = ”sotype = ”R””,
            Annars
                TextBox2.Text = TextBox2.Text & ”eller sotype = ”R””,
            Avsluta om
        Avsluta om

        Om cbPartial.Checked därefter
            Om TextBox2.Text = "" därefter
                TextBox2.Text = ”sotype = ”nolla””,
            Annars
                TextBox2.Text = TextBox2.Text & ”eller sotype = ”nolla””,
            Avsluta om
        Avsluta om

        Om cbRegular.Checked därefter
            Om TextBox2.Text = "" därefter
                TextBox2.Text = ”sotype = ''”,
            Annars
                TextBox2.Text = TextBox2.Text & ”eller sotype = ''”,
            Avsluta om
        Avsluta om

        Period (”vad”) = TextBox2.Text
        MsgBox (TextBox2.Text)

        Response.Redirect (”SOS.aspx”)

    Avsluta suben
Andra lösningar  
 
programming4us programming4us