Request.Querystring fra en variabel

HttpUtility.ParseQueryString

super, svar :)

Dog er det som om den ikke virker på alle strenge

Jeg bruger den sådan her.
HttpUtility.ParseQueryString(streng).Item("q")

På nogle strenge spytter den indeholdet af "q" ud, mens den på andre undlader det?

kan du give et eksempel paa en streng hvor det ikke virker ?

Jada

Samtlige google søgeresultater virker
eks: http://www.google.dk/search?hl=da&q=test&meta=

Der får den fat på strengen "test", som den skal.



msn virker f.eks aldrig af en eller anden grund.
eks: http://search.msn.dk/results.aspx?q=test&Form=MSNH&cp=65001
Der finder den intet

det er lidt som om den kun kan finde strengen, såfremt querystringen står efter et &-tegn og ikke et ?-tegn

?hl=da&q=test (virker)

?q=test (virker ikke)

Mystisk.

"?q=test" virker fint hos mig !

Meget mystisk...
Har lavet denne eksterne test.

        Dim var1 As String
        Dim var2 As String

        var1 = "http://www.google.dk/search?hl=da&q=test&meta="
        var2 = "http://search.msn.dk/results.aspx?q=test&Form=MSNH&cp=65001"

        lbl.Text = HttpUtility.ParseQueryString(var1).Item("q") & "<br />"
        lbl.Text &= HttpUtility.ParseQueryString(var2).Item("q")


Kun google resultatet udskrives.


Men du må gerne lægge et svar. Tak for hjælpen :)

Men præcis som jeg havde forventet, udskriver den begge resultater, hvis jeg ændre var2 til:
var2 = "http://search.msn.dk/results.aspx?crapcrap=crap&q=test&Form=MSNH&cp=65001"

Mysteriet er naesten opklaret.

HttpUtility.ParseQuery parser query strings ikke URL's.

Den virker tilfaeldigvis for URL's hvis path delen ikke indeholder special tegn.

Eksempel:

Imports System
Imports System.Collections.Specialized
Imports System.Web

Namespace E
    Public Class Program
        Public Shared Sub Test1(ByVal s As String)
            Console.WriteLine(s + " --> " + HttpUtility.ParseQueryString(s)("q"))
        End Sub
        Public Shared Sub Test2(ByVal s As String)
            Console.WriteLine(s + " --> " + HttpUtility.ParseQueryString((New Uri(s)).Query)("q"))
        End Sub
        Public Shared Sub Main(ByVal args As String())
            Test1("?hl=da&q=test&meta=")
            Test1("?q=test&Form=MSNH&cp=65001")
            Test1("http://www.google.dk/search?hl=da&q=test&meta=")
            Test1("http://search.msn.dk/results.aspx?q=test&Form=MSNH&cp=65001")
            Test2("http://www.google.dk/search?hl=da&q=test&meta=")
            Test2("http://search.msn.dk/results.aspx?q=test&Form=MSNH&cp=65001")
            Console.ReadKey()
        End Sub
    End Class
End Namespace

udskriver:

?hl=da&q=test&meta= --> test
?q=test&Form=MSNH&cp=65001 --> test
http://www.google.dk/search?hl=da&q=test&meta= --> test
http://search.msn.dk/results.aspx?q=test&Form=MSNH&cp=65001 -->
http://www.google.dk/search?hl=da&q=test&meta= --> test
http://search.msn.dk/results.aspx?q=test&Form=MSNH&cp=65001 --> test

Bemaerk at Uri ikke virker med kun query string.

Nej det er klart.

Det er super! Husk svaret ;)

svar