Avatar billede charly Nybegynder
10. februar 2002 - 20:40 Der er 5 kommentarer og
1 løsning

send xml

Hej,

Hvordan sender man et XML dokument til en anden eksempelvis .asp side?

/Charly
Avatar billede janegil Nybegynder
14. februar 2002 - 14:26 #1
Du kan vel ikke sende noe til en .asp? .asp må eventuelt selv hente det?

I så fall, se http://www.eksperten.dk/spm/99783
Avatar billede sagdjb Nybegynder
15. februar 2002 - 15:09 #2
Benyt XMLHttp funktionen i microsoft parseren, her laver du en:

set xmlsender = server.createobject("MSXML2.XMLHTTP.4.0") //eller 3.0

xmlsender.open "POST", "http://side.asp", False
xmlsender.setRequestHeader "Content-Type", "text/xml"
Xmlsender.send Xmldom //dit XML
Avatar billede medions Nybegynder
08. april 2002 - 16:35 #3
Et lille eksempel....:

<% @ Language = "VBScript" %>
<% Option Explicit
  Response.Expires = 0

If Request.ServerVariables("CONTENT_LENGTH") = 0 Then
%>
    <HTML>
    <HEAD>
    <TITLE>Gæstebogen - Opret Besked.</TITLE>
      <LINK REL="STYLESHEET" HREF="./stil.css" TYPE="text/css" />
    </HEAD>   
    <BODY BGCOLOR="Wheat">
    <DIV ALIGN="Center">
    <FONT FACE="Verdana" COLOR="DarkGreen" SIZE="3">
    <B>Opret Besked</B>
    </FONT>
    <FORM ACTION="<%= Request.ServerVariables("SCRIPT_NAME") %>" METHOD="POST">
    <TABLE BORDER="1" WIDTH="500">
    <TR>
        <TD WIDTH="100" ALIGN="Right">Navn:</TD>
        <TD><INPUT TYPE="TEXT" NAME="Navnet" SIZE="35"></INPUT></TD>
    </TR>
    <TR>
        <TD WIDTH="100" ALIGN="Right">E-mail:</TD>
        <TD><INPUT TYPE="TEXT" NAME="Mailen" SIZE="35"></INPUT></TD>
    </TR>
    <TR>
        <TD WIDTH="100" ALIGN="Right">Homepage:</TD>
        <TD><INPUT TYPE="TEXT" NAME="Webpage" SIZE="35"></INPUT></TD>
    </TR>
    <TR>
        <TD WIDTH="100" ALIGN="Right">Besked:</TD>
        <TD><TEXTAREA NAME="Besked" COLS="45" ROWS="10" WRAP></TEXTAREA></TD>
    </TR>
    <TR>
        <TD COLSPAN="2" ALIGN="Center"><INPUT TYPE="SUBMIT" VALUE="Send"><INPUT TYPE="RESET" VALUE="Slet Alt"></TD>
    </TR>
    </TABLE>   
    <A HREF="../index.asp">Startside</A>|<A HREF="./guestbook.xml">Gæstebogen</A>
    <P/>
    <FONT FACE="Verdana" SIZE="2">
    Der kan ikke bruges HTML-tags i beskeden.
    </FONT>
    </DIV>
    </BODY>
    <HTML>

<% ElseIf Request.Form("Navnet") = "" Then %>

    <HTML>
    <HEAD>
    <TITLE>Fejl i indtastning.</TITLE>
    <LINK REL="STYLESHEET" HREF="./stil.css" TYPE="text/css" />
    </HEAD>
    <BODY BGCOLOR="Wheat">
    <DIV ALIGN="Center">
    <FONT FACE="Verdana" COLOR="DarkGreen" SIZE="4">
    Du skal minimum skrive dit navn.
    </FONT>
    <P/>
    <A HREF="./OpretBesked.asp">Prøv igen</A> | <A HREF="./Guestbook.xml">Gå til Gæstebogen</A>
    </DIV>
    </BODY>
    </HTML>

<%Else

Dim XMLNode, objXML, objTemp, objBesked, objRoot, StrSti
Dim TempArray, Tekst, L, Linjer, AntalLinjer,Nylinje, TimeNow




TimeNow = Now

Nylinje = chr(13) & chr(10)

Tekst = Replace(Request.Form("Besked"),NyLinje,"##Y")

AntalLinjer = 1

For L = 1 to Len(Tekst)
    If Mid(Tekst, L, 3) = "##Y" Then AntalLinjer = AntalLinjer +1   
Next

TempArray = Split(Tekst,"##Y")

Linjer =""

L=0

For L = 0 to AntalLinjer - 1
    if AntalLinjer = 0 Then Exit For
    Linjer = Linjer & "<LINJE>" & TempArray(L) & "</LINJE>" & chr(13) & chr (10)
Next

XMLNode = "<VISITOR>"                                      & Chr(13) & Chr(10) & Chr(9) & _
        "<NAME>"    & Request.Form("Navnet")  &  "</NAME>"    & Chr(13) & Chr(10) & Chr(9) & _
        "<DATO>"    & TimeNow                &  "</DATO>"    & Chr(13) & Chr(10) & Chr(9) & _
        "<EMAIL>"  & Request.Form("Mailen")  &  "</EMAIL>"    & Chr(13) & Chr(10) & Chr(9) & _
        "<HOMEPAGE>"& Request.Form("Webpage") &  "</HOMEPAGE>" & Chr(13) & Chr(10) & Chr(9) & _   
        "<MESSAGE>" & Chr(13) & Chr(10) & Chr(9) & Linjer & Chr(13) & Chr(10) & Chr(9) & "</MESSAGE>"  & Chr(13) & Chr(10) & _
      "</VISITOR>"

strSti = Server.MapPath("Guestbook.xml")

set objXML  = Server.CreateObject("Microsoft.XMLDOM")
set objTemp = Server.CreateObject("Microsoft.XMLDOM")

objXML.load(strSti)

set objRoot = objXML.selectSingleNode("BOOK")

objTemp.loadXML(XMLNode)

set objBesked = objTemp.documentElement

objRoot.insertBefore objBesked, objRoot.childNodes(0)

objXML.save(strSti)

%>
<HTML>
<HEAD>
<TITLE>Besked er oprettet.</TITLE>
<LINK REL="STYLESHEET" HREF="./stil.css" TYPE="text/css" />
</HEAD>
<BODY BGCOLOR="Wheat">
<DIV ALIGN="Center">
<FONT FACE="Verdana" COLOR="DarkGreen" SIZE="4">
Din besked er blevet oprettet!
</FONT>
<FONT FACE="Verdana">
<P/>
<A HREF="../index.asp">Gå til startsiden</A> | <A HREF="./Guestbook.xml">Gå til Gæstebogen</A>
</FONT>
</DIV>
</BODY>
</HTML>
<%End If %>

//>Rune
Avatar billede sagdjb Nybegynder
11. april 2002 - 09:17 #4
Du har simpelthen accepteret en løsning, hvor man gemmer XML'et istedet for at sende det. Jeg er ked af at sige det, men det er sku' da en lam løsning. Med XMLHttp kan man benytte http's get og post funktioner til at sende, modtageren kan derefter parse det modtagne blot ved:

DOMParser.loadXML request

Her SENDER du XML... du gemmer det ikke som en temp. fil (og jeg tror dit spørgsmål gik på at SENDE XML mellem sider).
Avatar billede charly Nybegynder
11. april 2002 - 10:50 #5
Ja, og jeg beklager fik desværre tildelt den forkerte point'ene...

Kan det tilgives?
Avatar billede sagdjb Nybegynder
11. april 2002 - 10:51 #6
Den er bare 10-4... helt iorden!!!
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