服务器端

************

* server.php

************

$s = $HTTP_RAW_POST_DATA;

$t = gettimeofday();

$n = $t[sec].$t[usec];

$filename = "vml/" .$n. ".txt";

$fp = fopen($filename,"w");

fwrite($fp,$s);

fclose($fp);

echo $s;

?>

************

* server.asp

************

<%@ Language=VBScript %>

<%

Response.expires=-1

dim xmlrec

set xmlrec=server.CreateObject("microsoft.xmldom")

xmlrec.async=false

xmlrec.load(Request)

xmlrec.save Server.MapPath(".")&"\xxxx.xml"

%>