ASP y WebService

19/06/2004 - 09:51 por Omar del Valle | Informe spam
Hola lista

Necesito saber como comunicar una app en asp con un servicio Web. No tengo
claro usando Post que URL debo poner para referenciar a un método del Web
Service.

Saben si existe algo desarrollado para ASP que permita manipular las
conexiones a Servicios Web sin tener que lidiar con los XML?. Me refiero a
algo como lo que se hace en .NET, donde yo puedo retornar un Dataset y
obtener un Dataset, por ejemplo, sin tener en cuenta el XML.

Salu2
Omar del Valle R.
Ciudad de la Habana - Cuba
Desarrollador Microsoft 3 Estrellas .NET
 

Leer las respuestas

#1 Franco Figún
18/06/2004 - 19:32 | Informe spam
Tenes que usar el XMLHTTP, un ejemplo basico sacado del capitulo 2 del libro
Professional ASP.NET Web Serices con VB.NET::

'global.asa
<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Option Explicit
Sub Application_OnStart()
Application("ConnectString") = GetAppSettings("ConnectString")
End Sub

Function GetAppSettings(key)
Dim url, xmlhttp, dom, node
url = "http://localhost/PWS/Ch2-3/AppServi...smx/"
url = url & "GetAppSettings?key=" & key
Set xmlhttp = Server.CreateObject("Microsoft.XMLHTTP")
Call xmlhttp.Open("GET", url,False)
Call xmlhttp.send
Set dom = Server.CreateObject("Microsoft.XMLDOM")
dom.Load(xmlhttp.responseBody)
Set node = dom.SelectSingleNode("//string")

If Not node Is Nothing Then
GetAppSettings = node.text
End If
End Function
</SCRIPT>

'TestAppService.asp
<%@ Language = "VBScript" %>
<HTML><HEAD><title></title>
<%
Function GetAppSettings(key)
Dim url, xmlhttp, dom, node
url = "http://localhost/PWS/Ch2-3/AppServi...smx/"
url = url & "GetAppSettings?key=" & key
Set xmlhttp = Server.CreateObject("Microsoft.XMLHTTP")
Call xmlhttp.Open("GET", url,False)
Call xmlhttp.send
Set dom = Server.CreateObject("Microsoft.XMLDOM")
dom.Load(xmlhttp.responseBody)
Set node = dom.SelectSingleNode("//string")
Response.Write(Server.HTMLEncode(xmlhttp.responseText))
If Not node is Nothing Then
GetAppSettings = node.text
End If
End Function
Dim key
Dim value

If Len(Request("Submit1")) > 0 Then
Dim xmlhttp
Dim url
Dim dom

key = Request("key")
value = GetAppSettings(key)
End If
%>
</HEAD><body>
<BR>
Application("ConnectString")= <%=Application("ConnectString") %>
<BR>
<form>
<BR>
<INPUT id="key" type="text" name="key" value="<%=key%>">=<%=value%>
<P>
<INPUT id="Submit1" type="submit" value="GetAppSetting" name="Submit1">
<BR>
</form>
<P>
</body></HTML>





FF
www.francofigun.com.ar
www.microsofties.com.ar
MSN:
UIN: 314408886
Yahoo MSN:
"Omar del Valle" wrote in message
news:uDC$
Hola lista

Necesito saber como comunicar una app en asp con un servicio Web. No tengo
claro usando Post que URL debo poner para referenciar a un método del Web
Service.

Saben si existe algo desarrollado para ASP que permita manipular las
conexiones a Servicios Web sin tener que lidiar con los XML?. Me refiero a
algo como lo que se hace en .NET, donde yo puedo retornar un Dataset y
obtener un Dataset, por ejemplo, sin tener en cuenta el XML.

Salu2
Omar del Valle R.
Ciudad de la Habana - Cuba
Desarrollador Microsoft 3 Estrellas .NET


Preguntas similares