استفاده از وب سرویس در ASP کلاسیک

سلام و خیلی تشکرات فراوان از دوستانی که مرا مورد لطف قرار دادند.
اول اینکه اگر شرکتی را (در تهران) میشناسید که نیاز به برنامه نویس وب دارد، به ما هم خبر بدهید خیلی ممنون میشویم.
وبعد اینکه اگر یک زمانی وب سرویسی نوشتید و یک زمان دیگری خواستید از این وب سرویستان در یک برنامه ASP کلاسیک استفاده کنید، میتوانید روش زیر را امتحان کنید (البته حتماْ میدانید که باید MSXML PARSER را هم نصب شده داشته باشید)

<%
'******* USING GET METHOD
Dim wsurl="http://mysite/services/mywebservice.asmx/myfunction?var1=value1&var2=value2"
Dim xmlhttp
Set xmlhttp=Server.CreateObject("MSXML2.ServerXMLHTTP")
xmlhttp.open "GET",wsurl,false
xmlhttp.send
Dim rValue
rValue=xmlhttp.responseXML.selectSingleNode("/node1/node1_1")    'use XPATH as input argument
' or you can get response XML
' rValue=xmlhttp.responseXML
Set xmlhttp=nothing
 
'******* USING POST METHOD
Dim wsurl="http://mysite/services/mywebservice.asmx/myfunction"
Dim xmlhttp
Set xmlhttp=Server.CreateObject("MSXML2.ServerXMLHTTP")
xmlhttp.open "POST",wsurl,false
xmlhttp.send “var1=value1&var2=value2”
Dim rValue
rValue=xmlhttp.responseXML.selectSingleNode("/node1/node1_1")
' or you can get response XML
' rValue=xmlhttp.responseXML
Set xmlhttp=nothing
%>

<%
'******* USING GET METHOD
Dim wsurl="http://mysite/services/mywebservice.asmx/myfunction?var1=value1&var2=value2"
Dim xmlhttp
Set xmlhttp=Server.CreateObject("MSXML2.ServerXMLHTTP")
xmlhttp.open "GET",wsurl,false
xmlhttp.send
Dim rValue
rValue=xmlhttp.responseXML.selectSingleNode("/node1/node1_1")    'use XPATH as input argument
' or you can get response XML
' rValue=xmlhttp.responseXML
Set xmlhttp=nothing
 
'******* USING POST METHOD
Dim wsurl="http://mysite/services/mywebservice.asmx/myfunction"
Dim xmlhttp
Set xmlhttp=Server.CreateObject("MSXML2.ServerXMLHTTP")
xmlhttp.open "POST",wsurl,false
xmlhttp.send “var1=value1&var2=value2”
Dim rValue
rValue=xmlhttp.responseXML.selectSingleNode("/node1/node1_1")
' or you can get response XML
' rValue=xmlhttp.responseXML
Set xmlhttp=nothing
%>

البته راه دیگری با استفاده از SOAP هم وجود دارد که اگر خواستید در مورد آن اطلاع کسب کنید اینجا را ببینید.