1<% 2 ' -- SOAP::Lite -- soaplite.com -- Copyright (C) 2001 Paul Kulchenko -- 3 4 ' SOAP server. requires SOAP.Lite COM object (regsvr32 Lite.dll) 5 ' Path to Perl modules can be specified 6 ' as '/PATH/TO/MODULES' or as 'drive:/PATH/TO/MODULES' 7 8 Response.ContentType = "text/xml" 9 Response.Write(Server.CreateObject("SOAP.Lite") _ 10 .server("SOAP::Server") _ 11 .dispatch_to("/Your/Path/To/Deployed/Modules") _ 12 .handle(Request.BinaryRead(Request.TotalBytes)) _ 13 ) 14%> 15