ASP.NET Zone

Die ASP.NET Community. Alle Antworten rund um Microsoft® Webtechnologien
Willkommen bei ASP.NET Zone. Anmelden | Registrieren | Hilfe | Impressum | ASP.NET Zone Suchplugin

in
Home Blogs Foren FAQ Communities Fotos Downloads
Werbeanzeige

GET Parameter auslesen, allgemeine Fragen

Letzter Beitrag 05-20-2008, 22:16 von ksamaschke. 10 Antworten.
Beiträge sortieren: Zurück Weiter
  •  05-20-2008, 1:26 196336

    GET Parameter auslesen, allgemeine Fragen

    Hallo,
    Ich bin absoluter Neuling in der ASP Welt und habe nur ein paar Programmiererfahrungen mit Java und c.
    Nun muss ich aber innerhalb eines Praktikums eine Anwendung schreiben, bei deren Entwicklung ich leider nicht viel Hilfeleistung bekomme.
    Es geht darum, eine Seite zu bauen, die von einer anderen Seite aufgerufen wird und GET-Parameter (an die URL angehängt) übergeben bekommt. Diese Parameter sollen dann gespeichert werden, dann erfolgt eine Art Authentifizierung und am Ende werden die Anfangs übergebenen Daten genutzt, um eine andere Seite aufzurufen und wiederrum Parameter in GET Form an diese Seite weiterzuleiten.

    Soweit so gut, ich habe nun auch sample Code für das erste Erhalten von GET-Parametern und dem aufrufen der anderen Seite am Ende mit erneuter Parameterübergabe bekommen.
    Sobald ich diesen aber von der ersten Seite aufrufen lasse, wird mir nur der code angezeigt anstatt das eine Weiterleitung etc. erfolgt. Kann mir jemand sagen, woran das liegen könnte?

    Hier der Code:

    Dim usr As String = "Peter"
    Dim name As String = "Pan"
    Dim group As String = "Student"
    Dim department As String = "IT"
    Dim URLRedirect As String = ""
    Dim elms_redirect As String  = ""
    Dim token As String = ""
    Dim return_URL As String = ""
    Dim temp1 As String = ""
    Dim HttpWReq As HttpWebRequest
    Dim HttpWResp As HttpWebResponse
    token = Request.QueryString.Get("token")
    elms_redirect = Request.QueryString.Get("return_url")
    if the person came from elms  (ie there is a security token and return url, process code)
    IF elms_redirect <> ""  AND token <> "" THEN
    ‘ELMS CGI Connector (used to verify user account in ELMS to check existence and eligibility)
    URLRedirect = "https://urlhere_demo/index.cfm?loc=login/cab_cgi&token=" & token & "&uid=" & usr & "&groups=" & group & "&department=" & Department
    'Sending the request to the CGI on e-academy's side
    HttpWReq = System.Net.WebRequest.Create(URLRedirect)
    HttpWReq.Timeout = 50000
    'Getting response from the CGI
    HttpWResp = HttpWReq.GetResponse()
    'If there was a response, then parse it
    IF (HttpWResp.StatusCode = System.Net.HttpStatusCode.OK) THEN
    ‘Parse response
    Dim webstream As New StreamReader(HttpWResp.GetResponseStream(), System.Text.Encoding.ASCII())
    DO WHILE webstream.Peek() >= 0
    temp1 += webstream.ReadLine()
    LOOP
    webstream.Close()
    temp1 = temp1.Remove(0, 11)
    temp1 = temp1.Remove(temp1.Length - 3, 3)
    If the account was successfully authenticated then redirect to ELMS
    IF temp1 Like "0 Account *" THEN
    Response.Redirect(elms_redirect & "&token=" & token & "&uid=" & usr & "&groups=" & group & "&department=" & department, True)
    ELSE
    LoginError.Text = "---" + temp1 + "  Sorry, please try again."
    LoginError.Visible = True
    END IF
    ELSE
    LoginError.Text = "-- There was no response from ELMS, please try again."
    LoginError.Visible = True
    END IF
    ELSE
    LoginError.Text = "-- The required values were not found, please try again."
    LoginError.Visible = True
    END IF
    ELSE
        LoginError.Text = "-- Sorry username doesn't exist, please try again."
        LoginError.Visible = True
    END IF

  •  05-20-2008, 9:23 196337 Antwort zu 196336

    AW: GET Parameter auslesen, allgemeine Fragen

    Hallo und Willkommen auf ASP.NET Zone :-)
    kev85:
    Sobald ich diesen aber von der ersten Seite aufrufen lasse, wird mir nur der code angezeigt anstatt das eine Weiterleitung etc. erfolgt. Kann mir jemand sagen, woran das liegen könnte?
    wie rufst du die Seite mit dem Code denn auf? Der häufigste Grund dafür, das der Code angezeigt wird, ist der dass die ASP.NET Seite nicht über einen Webserver (default der IIS) aufgerufen wird oder der Webserver ASP.NET nicht interpretieren kann (Grund: .NET nicht installiert, falscher Webserver, falsche Dateiendung)
    MfG
    Jürgen

    ASP.NET Zone Team Blogs | gutsch-online | sharpcms | .NET Stammtisch Konstanz-Kreuzlingen
    20.08.2010: See# Party - Die Community Konferenz am Bodensee

    ASP.NET Zone - Leitfaden für gute Postings
  •  05-20-2008, 9:45 196339 Antwort zu 196336

    AW: GET Parameter auslesen, allgemeine Fragen

    Hi Kev85,

    Dein Code scheint soweit OK. Du Redirect'est ja auf Deinen Url-Parameter 'return_url'. Wie sieht denn die URL aus?

    Gruss
    Kristof

    .:www.zerbit.de :.
    Und Gott sprach: Es werde Licht! : Public Sub Light(); Call Light()
  •  05-20-2008, 12:28 196345 Antwort zu 196339

    AW: GET Parameter auslesen, allgemeine Fragen

    Hi Kristof,

    kristof:
    Dein Code scheint soweit OK. Du Redirect'est ja auf Deinen Url-Parameter 'return_url'. Wie sieht denn die URL aus?
    Jep, der Code scheint okay, was allerdings egal ist da er nie ausgeführt wird:
    kev85:
    Sobald ich diesen aber von der ersten Seite aufrufen lasse, wird mir nur der code angezeigt anstatt das eine Weiterleitung etc. erfolgt. Kann mir jemand sagen, woran das liegen könnte?


    MfG
    Jürgen

    ASP.NET Zone Team Blogs | gutsch-online | sharpcms | .NET Stammtisch Konstanz-Kreuzlingen
    20.08.2010: See# Party - Die Community Konferenz am Bodensee

    ASP.NET Zone - Leitfaden für gute Postings
  •  05-20-2008, 13:20 196351 Antwort zu 196345

    AW: GET Parameter auslesen, allgemeine Fragen

    Danke schonmal für die Antworten und das Willkommen! :)
    Bisher bin ich ja davon ausgegangen, dass ich den sample code, so wie er oben im Post steht einfach als sample.aspx speichern kann und ihn die sample.aspx dann von der Seite die die Parameter übergibt aufrufen lassen kann.

    Nun wurde ich darauf hingewiesen, dass ich das ganze doch in ein HTML Gerüst einbetten sollte, wie folgt:

    <%@ Page Language="VB" %>
    <%@ Import Namespace="System.Net" %>
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    <script runat="server">
        Dim usr As String = "Peter"
        Dim name As String = "Pan"
        Dim group As String = "Student"
        Dim department As String = "IT"
        Dim URLRedirect As String = ""
        Dim elms_redirect As String = ""
        Dim token As String = ""
        Dim return_URL As String = ""
        Dim temp1 As String = ""
        Dim HttpWReq As HttpWebRequest
        Dim HttpWResp As HttpWebResponse
    token = Request.QueryString.Get("token")
    elms_redirect = Request.QueryString.Get("return_url")
        'if the person came from elms  (ie there is a security token and return url, process code)
    IF elms_redirect <> ""  AND token <> "" THEN
        'ELMS CGI Connector (used to verify user account in ELMS to check existence and eligibility)
    URLRedirect = "https://urlhere_demo/index.cfm?loc=login/cab_cgi&token=" & token & "&uid=" & usr & "&groups=" & group & "&department=" & Department
        'Sending the request to the CGI on e-academy's side
    HttpWReq = System.Net.WebRequest.Create(URLRedirect)
    HttpWReq.Timeout = 50000
        'Getting response from the CGI
    HttpWResp = HttpWReq.GetResponse()
        'If there was a response, then parse it
    IF (HttpWResp.StatusCode = System.Net.HttpStatusCode.OK) THEN
        'Parse response
        Dim webstream As New StreamReader(HttpWResp.GetResponseStream(), System.Text.Encoding.ASCII())
    DO WHILE webstream.Peek() >= 0
    temp1 += webstream.ReadLine()
    LOOP
    webstream.Close()
    temp1 = temp1.Remove(0, 11)
    temp1 = temp1.Remove(temp1.Length - 3, 3)
        'If the account was successfully authenticated then redirect to ELMS
    IF temp1 Like "0 Account *" THEN
    Response.Redirect(elms_redirect & "&token=" & token & "&uid=" & usr & "&groups=" & group & "&department=" & department, True)
    ELSE
    LoginError.Text = "---" + temp1 + "  Sorry, please try again."
    LoginError.Visible = True
    END IF
    ELSE
    LoginError.Text = "-- There was no response from ELMS, please try again."
    LoginError.Visible = True
    END IF
    ELSE
    LoginError.Text = "-- The required values were not found, please try again."
    LoginError.Visible = True
    END IF
    ELSE
        LoginError.Text = "-- Sorry username doesn't exist, please try again."
        LoginError.Visible = True
    END IF
    </script>
    <html xmlns="http://www.w3.org/1999/xhtml">
    <head runat="server">
        <title>Test connection</title>
    </head>
    <body>
        <form id="form1" runat="server">
        <div>
       
        </div>
        </form>
    </body>
    </html>


    Immerhin bringt mir das schonmal ne Menge kompelier Fehler, ich habe auch einfache HelloWorld Sachen auf dem IIS Server getestet auf dem das ganze laufen soll, am Server scheints nicht zu liegen.

    Mein Problem ist, dass ich hier relativ viel Druck bekomme, die Sache zum Laufen zu bekommen, aber leider keine Hilfestellung und ich gerade im Web Bereich noch fast nichts gemacht habe.
    Ist das Einbetten in HTML wie im Code oben geschehen wirklich notwendig? Ich will ja nichts anzeigen, sondern nur weiterleiten. Und die Compilerfehler die mir angezeigt werden in der eingebetteten Version sind mir auch Rätselhaft, da er Deklarationen erwartet, obwohl am Anfang des Skriptblocks doch alle Variablen deklariert werden.

    Bin für jede Hilfe dankbar.
  •  05-20-2008, 13:33 196355 Antwort zu 196351

    AW: GET Parameter auslesen, allgemeine Fragen

    kev85:

    Immerhin bringt mir das schonmal ne Menge kompelier Fehler, ich habe auch einfache HelloWorld Sachen auf dem IIS Server getestet auf dem das ganze laufen soll, am Server scheints nicht zu liegen.

    Mein Problem ist, dass ich hier relativ viel Druck bekomme, die Sache zum Laufen zu bekommen, aber leider keine Hilfestellung und ich gerade im Web Bereich noch fast nichts gemacht habe.
    Ist das Einbetten in HTML wie im Code oben geschehen wirklich notwendig? Ich will ja nichts anzeigen, sondern nur weiterleiten. Und die Compilerfehler die mir angezeigt werden in der eingebetteten Version sind mir auch Rätselhaft, da er Deklarationen erwartet, obwohl am Anfang des Skriptblocks doch alle Variablen deklariert werden.
    Poste doch mal bitte die Fehlermeldung, ohne die müssen wir weiter raten.

    Wenn der Compiler eine Deklaration, erwartet ist das in der Regel auch so. Die Fehlermeldung sagt einem aber auch, was er für eine Deklaration erwartet. ;-)


    MfG
    Jürgen

    ASP.NET Zone Team Blogs | gutsch-online | sharpcms | .NET Stammtisch Konstanz-Kreuzlingen
    20.08.2010: See# Party - Die Community Konferenz am Bodensee

    ASP.NET Zone - Leitfaden für gute Postings
  •  05-20-2008, 13:51 196361 Antwort zu 196351

    AW: GET Parameter auslesen, allgemeine Fragen

    Ah, OK. Nur Code ist natürlich nicht lauffähig. Im Grunde ist eine ASP.NET-Seite (aspx) nicht anderes als eine HTML-Seite, die der Code dynamisch zusammenstellt, sprich der Web-Server liefert immer HTML an den Browser aus.

    An Deinem Beispiel ist mir aufgefallen, dass ein IF-Statement fehlt, kann das sein? Der letzte ELSE ... END IF-Block schein keine Entsprechung zu haben.

    Gruss
    Kristof

    .:www.zerbit.de :.
    Und Gott sprach: Es werde Licht! : Public Sub Light(); Call Light()
  •  05-20-2008, 13:56 196362 Antwort zu 196355

    AW: GET Parameter auslesen, allgemeine Fragen

    Die Fehlermeldung ist extrem lang und leider kann ich die Fehler nicht nachvollziehen, aus irgendeinem Grund wird wohl ein großer Teil des Cods ignoriert? :(


    Microsoft (R) Visual Basic, Compilerversion 8.0.50727.1434
    für Microsoft (R) .NET Framework, Version 2.0.50727.1434
    Copyright (C) Microsoft Corporation. Alle Rechte vorbehalten.

    C:\praktikum\sample.aspx(21) : error BC30188: Deklaration erwartet.

    token = Request.QueryString.Get("token")
    ~~~~~
    C:\praktikum\sample.aspx(22) : error BC30188: Deklaration erwartet.

    elms_redirect = Request.QueryString.Get("return_url")
    ~~~~~~~~~~~~~
    C:\praktikum\sample.aspx(25) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    IF elms_redirect <> "" AND token <> "" THEN
    ~~
    C:\praktikum\sample.aspx(28) : error BC30188: Deklaration erwartet.

    URLRedirect = "https://urlhere_demo/index.cfm?loc=login/cab_cgi&token=" & token & "&uid=" & usr & "&groups=" & group & "&department=" & Department
    ~~~~~~~~~~~
    C:\praktikum\sample.aspx(31) : error BC30188: Deklaration erwartet.

    HttpWReq = System.Net.WebRequest.Create(URLRedirect)
    ~~~~~~~~
    C:\praktikum\sample.aspx(32) : error BC30188: Deklaration erwartet.

    HttpWReq.Timeout = 50000
    ~~~~~~~~
    C:\praktikum\sample.aspx(35) : error BC30188: Deklaration erwartet.

    HttpWResp = HttpWReq.GetResponse()
    ~~~~~~~~~
    C:\praktikum\sample.aspx(38) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    IF (HttpWResp.StatusCode = System.Net.HttpStatusCode.OK) THEN
    ~~
    C:\praktikum\sample.aspx(41) : error BC30002: Der Typ StreamReader ist nicht definiert.

    Dim webstream As New StreamReader(HttpWResp.GetResponseStream(), System.Text.Encoding.ASCII())
    ~~~~~~~~~~~~
    C:\praktikum\sample.aspx(42) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    DO WHILE webstream.Peek() >= 0
    ~~
    C:\praktikum\sample.aspx(43) : error BC30188: Deklaration erwartet.

    temp1 += webstream.ReadLine()
    ~~~~~
    C:\praktikum\sample.aspx(44) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    LOOP
    ~~~~
    C:\praktikum\sample.aspx(45) : error BC30188: Deklaration erwartet.

    webstream.Close()
    ~~~~~~~~~
    C:\praktikum\sample.aspx(46) : error BC30188: Deklaration erwartet.

    temp1 = temp1.Remove(0, 11)
    ~~~~~
    C:\praktikum\sample.aspx(47) : error BC30188: Deklaration erwartet.

    temp1 = temp1.Remove(temp1.Length - 3, 3)
    ~~~~~
    C:\praktikum\sample.aspx(50) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    IF temp1 Like "0 Account *" THEN
    ~~
    C:\praktikum\sample.aspx(51) : error BC30188: Deklaration erwartet.

    Response.Redirect(elms_redirect & "&token=" & token & "&uid=" & usr & "&groups=" & group & "&department=" & department, True)
    ~~~~~~~~
    C:\praktikum\sample.aspx(52) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    ELSE
    ~~~~
    C:\praktikum\sample.aspx(53) : error BC30188: Deklaration erwartet.

    LoginError.Text = "---" + temp1 + " Sorry, please try again."
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(54) : error BC30188: Deklaration erwartet.

    LoginError.Visible = True
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(55) : error BC30087: Vor "End If" muss ein zugehöriges "If" stehen.

    END IF
    ~~~~~~
    C:\praktikum\sample.aspx(56) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    ELSE
    ~~~~
    C:\praktikum\sample.aspx(57) : error BC30188: Deklaration erwartet.

    LoginError.Text = "-- There was no response from ELMS, please try again."
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(58) : error BC30188: Deklaration erwartet.

    LoginError.Visible = True
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(59) : error BC30087: Vor "End If" muss ein zugehöriges "If" stehen.

    END IF
    ~~~~~~
    C:\praktikum\sample.aspx(60) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    ELSE
    ~~~~
    C:\praktikum\sample.aspx(61) : error BC30188: Deklaration erwartet.

    LoginError.Text = "-- The required values were not found, please try again."
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(62) : error BC30188: Deklaration erwartet.

    LoginError.Visible = True
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(63) : error BC30087: Vor "End If" muss ein zugehöriges "If" stehen.

    END IF
    ~~~~~~
    C:\praktikum\sample.aspx(64) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    ELSE
    ~~~~
    C:\praktikum\sample.aspx(65) : error BC30188: Deklaration erwartet.

    LoginError.Text = "-- Sorry username doesn't exist, please try again."
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(66) : error BC30188: Deklaration erwartet.

    LoginError.Visible = True
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(67) : error BC30087: Vor "End If" muss ein zugehöriges "If" stehen.

    END IF
  •  05-20-2008, 14:07 196364 Antwort zu 196362

    AW: GET Parameter auslesen, allgemeine Fragen

    Hi,

    wie ich bereits erwähnte, Dir fehlt ein IF-Statement am Anfang des Codes, das mit dem letzten ELSE...END IF-Block korrespondiert. Lösch die letzten drei Zeilen einfach mal weg und schau was geht.

    Zudem brauchst Du noch <%@ Import Namespace="System.IO" %> damit der StreamReader funktioniert oder Du schreibst Dim webstream As New System.IO.StreamReader.

    Mach mal und poste mal die FM, wenn es imemr noch nicht geht.

    Gruss
    Kristof

    .:www.zerbit.de :.
    Und Gott sprach: Es werde Licht! : Public Sub Light(); Call Light()
  •  05-20-2008, 17:42 196373 Antwort zu 196364

    AW: GET Parameter auslesen, allgemeine Fragen

    Danke für den Hinweis! Habe den Block am Ende entfernt, der war noch für die in dieser Version noch nicht berücksichtigte Authentifizierung gedacht. Den Import am Anfang habe ich auch eingefügt, leider ist die Fehlerliste noch immer so lang.
    Habe ich vielleicht gleich am Anfang irgendwo einen Syntaxfehler? Er scheint die Variablendeklarationen am Anfang ja zu ignorieren und sagt dann dauernd das die Aufrufe ausserhalb der Methode stattfinden würden?

    Hier nochmal der aktuelle code und die compiler Meldung:

    Code
    <%@ Page Language="VB" %>
    <%@ Import Namespace="System.Net" %>
    <%@ Import Namespace="System.IO" %>
    <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
    <script runat="server">
        Dim usr As String = "Peter"
        Dim name As String = "Pan"
        Dim group As String = "Student"
        Dim department As String = "IT"
        Dim URLRedirect As String = ""
        Dim elms_redirect As String = ""
        Dim token As String = ""
        Dim return_URL As String = ""
        Dim temp1 As String = ""
        Dim HttpWReq As HttpWebRequest
        Dim HttpWResp As HttpWebResponse
        token = Request.QueryString.Get("token")
        elms_redirect = Request.QueryString.Get("return_url")
        'if the person came from elms  (ie there is a security token and return url, process code)
        IF elms_redirect <> ""  AND token <> "" THEN
        'ELMS CGI Connector (used to verify user account in ELMS to check existence and eligibility)
            URLRedirect = "https://urlhere_demo/index.cfm?loc=login/cab_cgi&token=" & token & "&uid=" & usr & "&groups=" & group & "&department=" & Department
        'Sending the request to the CGI on e-academy's side
            HttpWReq = System.Net.WebRequest.Create(URLRedirect)
            HttpWReq.Timeout = 50000
        'Getting response from the CGI
            HttpWResp = HttpWReq.GetResponse()
        'If there was a response, then parse it
            IF (HttpWResp.StatusCode = System.Net.HttpStatusCode.OK) THEN
        'Parse response
        Dim webstream As New StreamReader(HttpWResp.GetResponseStream(), System.Text.Encoding.ASCII())
                  DO WHILE webstream.Peek() >= 0
                      temp1 += webstream.ReadLine()
                  LOOP
                  webstream.Close()
                  temp1 = temp1.Remove(0, 11)
                  temp1 = temp1.Remove(temp1.Length - 3, 3)
        'If the account was successfully authenticated then redirect to ELMS
                  IF temp1 Like "0 Account *" THEN
                      Response.Redirect(elms_redirect & "&token=" & token & "&uid=" & usr & "&groups=" & group & "&department=" & department, True)
                  ELSE
                      LoginError.Text = "---" + temp1 + "  Sorry, please try again."
                      LoginError.Visible = True
                  END IF
            ELSE
                LoginError.Text = "-- There was no response from ELMS, please try again."
                LoginError.Visible = True
            END IF
        ELSE
            LoginError.Text = "-- The required values were not found, please try again."
            LoginError.Visible = True
        END IF
       
    </script>
    <html xmlns="http://www.w3.org/1999/xhtml">
    <head runat="server">
        <title>MSDNAA Test connection</title>
    </head>
    <body>
        <form id="form1" runat="server">
        <div>
       
        </div>
        </form>
    </body>
    </html>




    Compiler

    Microsoft (R) Visual Basic, Compilerversion 8.0.50727.1434
    für Microsoft (R) .NET Framework, Version 2.0.50727.1434
    Copyright (C) Microsoft Corporation. Alle Rechte vorbehalten.

    C:\praktikum\sample.aspx(22) : error BC30188: Deklaration erwartet.

    token = Request.QueryString.Get("token")
    ~~~~~
    C:\praktikum\sample.aspx(23) : error BC30188: Deklaration erwartet.

    elms_redirect = Request.QueryString.Get("return_url")
    ~~~~~~~~~~~~~
    C:\praktikum\sample.aspx(26) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    IF elms_redirect <> "" AND token <> "" THEN
    ~~
    C:\praktikum\sample.aspx(29) : error BC30188: Deklaration erwartet.

    URLRedirect = "https://urlhere_demo/index.cfm?loc=login/cab_cgi&token=" & token & "&uid=" & usr & "&groups=" & group & "&department=" & Department
    ~~~~~~~~~~~
    C:\praktikum\sample.aspx(32) : error BC30188: Deklaration erwartet.

    HttpWReq = System.Net.WebRequest.Create(URLRedirect)
    ~~~~~~~~
    C:\praktikum\sample.aspx(33) : error BC30188: Deklaration erwartet.

    HttpWReq.Timeout = 50000
    ~~~~~~~~
    C:\praktikum\sample.aspx(36) : error BC30188: Deklaration erwartet.

    HttpWResp = HttpWReq.GetResponse()
    ~~~~~~~~~
    C:\praktikum\sample.aspx(39) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    IF (HttpWResp.StatusCode = System.Net.HttpStatusCode.OK) THEN
    ~~
    C:\praktikum\sample.aspx(43) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    DO WHILE webstream.Peek() >= 0
    ~~
    C:\praktikum\sample.aspx(44) : error BC30188: Deklaration erwartet.

    temp1 += webstream.ReadLine()
    ~~~~~
    C:\praktikum\sample.aspx(45) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    LOOP
    ~~~~
    C:\praktikum\sample.aspx(46) : error BC30188: Deklaration erwartet.

    webstream.Close()
    ~~~~~~~~~
    C:\praktikum\sample.aspx(47) : error BC30188: Deklaration erwartet.

    temp1 = temp1.Remove(0, 11)
    ~~~~~
    C:\praktikum\sample.aspx(48) : error BC30188: Deklaration erwartet.

    temp1 = temp1.Remove(temp1.Length - 3, 3)
    ~~~~~
    C:\praktikum\sample.aspx(51) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    IF temp1 Like "0 Account *" THEN
    ~~
    C:\praktikum\sample.aspx(52) : error BC30188: Deklaration erwartet.

    Response.Redirect(elms_redirect & "&token=" & token & "&uid=" & usr & "&groups=" & group & "&department=" & department, True)
    ~~~~~~~~
    C:\praktikum\sample.aspx(53) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    ELSE
    ~~~~
    C:\praktikum\sample.aspx(54) : error BC30188: Deklaration erwartet.

    LoginError.Text = "---" + temp1 + " Sorry, please try again."
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(55) : error BC30188: Deklaration erwartet.

    LoginError.Visible = True
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(56) : error BC30087: Vor "End If" muss ein zugehöriges "If" stehen.

    END IF
    ~~~~~~
    C:\praktikum\sample.aspx(57) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    ELSE
    ~~~~
    C:\praktikum\sample.aspx(58) : error BC30188: Deklaration erwartet.

    LoginError.Text = "-- There was no response from ELMS, please try again."
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(59) : error BC30188: Deklaration erwartet.

    LoginError.Visible = True
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(60) : error BC30087: Vor "End If" muss ein zugehöriges "If" stehen.

    END IF
    ~~~~~~
    C:\praktikum\sample.aspx(61) : error BC30689: Die Anweisung kann nicht außerhalb des Methodentexts stehen.

    ELSE
    ~~~~
    C:\praktikum\sample.aspx(62) : error BC30188: Deklaration erwartet.

    LoginError.Text = "-- The required values were not found, please try again."
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(63) : error BC30188: Deklaration erwartet.

    LoginError.Visible = True
    ~~~~~~~~~~
    C:\praktikum\sample.aspx(64) : error BC30087: Vor "End If" muss ein zugehöriges "If" stehen.

    END IF
    ~~~~~~


  •  05-20-2008, 22:16 196381 Antwort zu 196373

    AW: GET Parameter auslesen, allgemeine Fragen

    Du weißt aber schon, dass das alles in eine Methode gehört? Informier dich doch mal über Konzept hinter dem Function-Schlüsselwort. Wink

    Mit freundlichen Grüßen / Best Regards

    Karsten Samaschke
    Entwickler, Trainer, Autor, Coach

    wpzone.de - Community rund um die WP7-Entwicklung
    karsan.de - mein Weblog
    familyblogger.de - mein Haus, mein Auto, meine Kinder
Als RSS Feed in XML ansehen
Powered by Community Server (Commercial Edition)