Avatar billede medjeti Nybegynder
27. november 2000 - 03:25 Der er 7 kommentarer og
1 løsning

Modtage variabler fra en asp-side

HejHej

Jeg sender en håndfuld variabler i en QueryString til en asp-side med denne linie:

Inet1.Execute \"http//url.dk?Variabel=1\", \"GET\"

Nu vil jeg så gerne have et svar fra asp-siden, i form af en ny håndfuld variabler (som den trækker ud af database).

Hvordan kan det lade sig gøre at sende disse variabler?
Avatar billede tdaugaard Nybegynder
27. november 2000 - 06:38 #1
Det du kan gøre er, at (har nemlig selv lavet det engang ..) lade din ASP side udskrive værdierne med Response.Write hvor du evt. kan have en delimiter (som f.eks. Chr$(0) hvis du har strenge med mellemrum i)

Så bruger du

strContent = Inet1.Execute(\"http//url.dk?Variabel=1\", \"GET\")

og det som ASP siden \"udskrev\" vil være at finde i strContent.
Avatar billede medjeti Nybegynder
27. november 2000 - 17:29 #2
Okay, tak for det, det virker sgu meget cool...
Jeg får nu returneret mine variabler på hver deres linie:

Variabel1
Variabel2
Variabel3

Lige et bonusspørgsmål:
Hvordan får jeg nu disse linier \"skilt ad\"?
(Hver variabel skal være et punkt i en combobox:
combo1.AddItem Variabel1, osv...)
Avatar billede tdaugaard Nybegynder
27. november 2000 - 17:33 #3
Hæ hæ ..

Hvis du bruger VB 6.0 kan du bruge Split(). Hvis ikke, så er det mere besværligt

strVars = Split(strContent, vbCrLf)

For intIndex = 0 To UBound(strVars)
  Debug.Print strVars(intIndex)
Next
Avatar billede medjeti Nybegynder
27. november 2000 - 18:19 #4
You the man...

Nu er det nok lige at presse grænsen for de 30 point, men jeg prøver...

Den melder fejl ved linien:
For intIndex = 0 To UBound(strVars)

- Den markerer UBound og siger: \"Expected array\"

Det er nok bare mig der er pathtic, men hvad er det liiige jeg gør galt?
Avatar billede medjeti Nybegynder
27. november 2000 - 18:20 #5
Ehh... pathtic = pathetic ... hvilket bare understreger min pointe... :)
Avatar billede tdaugaard Nybegynder
27. november 2000 - 18:27 #6
*lol* naa .. det handler om at du bliver tilfreds.. ikke om de point dem har jeg nok af ;-)

Wierd .. jeg har lige prøve i VB 6.0 selv med flg. kode

Private Sub Command1_Click()
    s = \"noget andet noget som skodder\"
    arr = Split(s, \" \")
   
For intIndex = 0 To UBound(arr)
  Debug.Print arr(intIndex)
Next
End Sub


og jeg fik ingen fejl !?
Avatar billede medjeti Nybegynder
27. november 2000 - 18:51 #7
Yabadabadooo
Skiftede \"strVars\" ud med \"arr\" og så rullede det.
Tak igen :)
Avatar billede tdaugaard Nybegynder
27. november 2000 - 18:52 #8
Wierd, men okai .. det virkede :-)
Det var så lidt.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester