Avatar billede kelo Nybegynder
14. januar 2003 - 15:18 Der er 3 kommentarer og
1 løsning

Login script -> skal fange session streng fra tilbage svaret.

Her er min kode.

<FORM name=loginRequest
action=http://www.oexdemo.gatetrade.net/orders/LinkinLogin.jsp method=post></P>
<P><TEXTAREA name=loginRequest rows=10 cols=70>
<?xml version = '1.0'?>
<request>
  <header version="1.0">
    <login>
      <username>xxx</username>
      <password>xxx</password>
    </login>
  </header>
  <body>
  <loginRequest>
<INPUT type=submit value=Submit name=B1><INPUT type=reset value=Reset name=B2>
</FORM>
    <returnURL>http://XXX.XXX.XXX</returnURL>
    </loginRequest>
  </body>
</request>
------------------------
når man trykker submit, får man dette tilbage i hovedet.
------------------------
<?xml version = '1.0'?>
<response>
  <header version="1.0">
      <action>
        <![CDATA[LOGIN_RESPONSE]]>
      </action>
  </header>
  <body>
      <loginInfo>
        <loginURL>
            <![CDATA[https://www.oexdemo.gatetrade.net/orders/xx.js?xxxx]]>
        </loginURL>
      </loginInfo>
  </body>
</response>
----------------------------
Så er mit spørgsmål, hvordan fanger jeg loginURL. På et nyt side, eller kan man fange den fra kaldende?
Evt. et eksemple på hvordan jeg gør.

--Kelo
Avatar billede tobias_cool Nybegynder
14. januar 2003 - 15:49 #1
Måske lidt usmart at skrive et password i en XML-fil, eller det er sådan jeg har forstået du vil ik?
Avatar billede kelo Nybegynder
15. januar 2003 - 08:18 #2
gatetrade's script generer et nyt login session (LoginUrl) hver gang.
Avatar billede kelo Nybegynder
30. januar 2003 - 11:36 #3
str ="FORM data indsættes her."
    str = "loginRequest="& str

    Filnavn = "test.xml"
    Set FSO = server.CreateObject("Scripting.FileSystemObject")
    Set fil = FSO.CreateTextFile("" & Server.MapPath(Filnavn), True)

    fil.write PostFormdataxmlhttp("https://www.xxx.jsp", str, "http://www.whatrever.com/yourfilename.html")

    Set fil = nothing
    Set FSO = nothing

    Set objXML = Server.CreateObject("Microsoft.XMLDOM")
    objXML.async = False
    objXML.Load (Server.MapPath(FilNavn))

    If objXML.parseError.errorCode <> 0 Then
            Response.Write objXML.parseError.reason
            Response.Write("<br>")
            Response.Write("Der er sket en fejl")
            Response.end()
    End If   
-------------------------------------------
<script language=vbscript runat=server>
Function PostFormdataxmlhttp (Post_url,Form_Data,Fake_Referrer)
 
    Set xml = Server.CreateObject("Msxml2.ServerXMLHTTP.4.0")
    xml.Open "POST", Post_url, False
    xml.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
          If Fake_Referrer<>"" then
              xml.setRequestHeader "referer",Fake_Referrer
        End If
    xml.Send Form_Data
    PostFormdataxmlhttp =  xml.responseText
    Set xml = Nothing
End Function 
</script>
----------------------------------------------------
Sådan, kan man gøre. Man sender altså data over til en anden server via xmlhttp, derefter har jeg valgt at smide det data jeg får smidt i hovedet ned i en fil.
Avatar billede kelo Nybegynder
30. januar 2003 - 11:37 #4
lukket
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