spasibo za atvet andik, no nikak ne magu dastat' celyi XML
$q=<stdin>; daet tol'ko header <?xml version="1.0"?> a astal'noi xml prapadaet
i kak ia dumau etot fragment vovse ne iz zaprosa — ia zamenil version=1.0 na 2.0 i vsio ravno daet 1.0
vot sama proga
client :
<html>
.....
<SCRIPT LANGUAGE="JavaScript">
<!--
function sendrequest(){
var URL = "http://localhost/test/server.pl";
var XSL = "http://localhost/test/response.xsl"
var T0095, TYPE, sXML, xmlHTTP;
var xmlDoc = new ActiveXObject("Microsoft.XMLDOM");
var xmlHTTP = new ActiveXObject("Microsoft.XMLHTTP");
xmlDoc.async = false;
// Build an XML fragment
sXML = "<?xml version='1.0' ?>";
sXML += "<Client Version='2.0'>";
sXML += '<T0095>222</T0095>';
sXML += '<TYPE>333</TYPE>';
sXML += '<SUBTYPE>444</SUBTYPE>';
sXML += '<VAL>555</VAL>';
sXML += '<CASCADE>123</CASCADE></Client>';
alert(sXML);
xmlHTTP.open("GET",URL, false);
xmlDoc.loadXML(sXML);
xmlHTTP.setRequestHeader("Content-type", "text/xml")
xmlHTTP.send(xmlDoc);
alert(xmlHTTP.responseXML.xml);// etim alertom uznau chto vazvrashaetsia nazad
var srcTree = new ActiveXObject('Microsoft.XMLDOM');
srcTree.async=false;
srcTree.load(xmlHTTP.responseXML.xml);
var xsltTree= new ActiveXObject('Microsoft.XMLDOM');
xsltTree.async = false;
xsltTree.load(XSL);
document.write(xmlHTTP.responseXML.transformNode(xsltTree));
}
//-->
</SCRIPT>
.....
</html>
vot paluchatel' (server):
#!/usr/bin/perl
my $q=<>;
chomp($q);
###### return xml string to client ##############################
my $xml_string = "<respond1>$q</respond1>";
my $length = length($xml_string);
print <<EOD;
Status: 200 OK
Content-type: text/xml
Content-length: $length;
EOD
print $xml_string;
esli est' rabochyi variant PLEASE prishlite ili abiasnite kak sdelat'
Здравствуйте, andik, Вы писали:
A>Здравствуйте, Chugu, Вы писали:
C>>XELP, podskajite kak dastat' xml data otpravlenyi xmlhttp c clientskoi IE na servere perl-om
C>>podrobnee:
C>>u menia est' clientskaia proga napisannaya na javascript kotoraia c pomoshu xmlhttp otpravliaet xml request(vrode etogo <?xml ver...><val>12</val>) na ukazannyi URL
C>>xmlHTTP.open("POST","http://localhost/test1.pl", false)
C>>xochu dastat' etot grebannyi XML v hash masiv ili ne imeet znachenia vo chto
C>>pamagite esli kto uje delal podobloe
A>читай STDIN
A>A> chomp($xml = <STDIN>);
A>
