Estás trabajando sin conexión, espera a que vuelva la conexión a Internet

Cómo crear y utilizar servicios Web XML mediante Visual Studio .NET o Visual Studio 2005

IMPORTANTE: Este artículo ha sido traducido por un software de traducción automática de Microsoft (http://support.microsoft.com/gp/mtdetails) en lugar de un traductor humano. Microsoft le ofrece artículos traducidos por un traductor humano y artículos traducidos automáticamente para que tenga acceso en su propio idioma a todos los artículos de nuestra base de conocimientos (Knowledge Base). Sin embargo, los artículos traducidos automáticamente pueden contener errores en el vocabulario, la sintaxis o la gramática, como los que un extranjero podría cometer al hablar el idioma. Microsoft no se hace responsable de cualquier imprecisión, error o daño ocasionado por una mala traducción del contenido o como consecuencia de su utilización por nuestros clientes. Microsoft suele actualizar el software de traducción frecuentemente.

Haga clic aquí para ver el artículo original (en inglés): 315935
Resumen
En este artículo se muestra cómo crear y utilizar un XML Web service con de Visual Studio .NET o Visual Studio 2005 .

back to the top

Requisitos

En la lista siguiente se describe el hardware, el software, la infraestructura de red y los service pack recomendados que se necesitarán:
  • Microsoft Visual Studio .NET o Microsoft Visual Studio 2005
  • Microsoft Internet Information Server 4.0 o servicios de Microsoft Internet Information Server 5.0
En este artículo se supone que está familiarizado con los temas siguientes:
  • Visual Basic .NET o Visual Basic 2005
  • Visual Studio .NET o Visual Studio 2005
back to the top

Servicios Web XML

Servicios Web XML son unidades reutilizables de lógica de aplicación que puede exponer a los clientes a través de Internet. Servicios Web son independientes de plataforma. Además, servicios Web se basan en estándares que acepta el sector al como lenguaje de marcado extensible (XML), SOAP (Simple Object Access Protocol) y transferencia de hipertexto (HTTP). Cliente pueden ser aplicaciones cualquiera de los siguientes:
  • Aplicación ASP.NET basada en Web
  • Aplicación de Windows
  • Aplicación de Pocket PC
  • Aplicación de dispositivo móvil
  • Aplicación de consola
Servicios Web XML proporcionan una forma nueva de conectividad a toda la empresa. Visual Studio .NET o Visual Studio 2005 facilita a crear y utilizar XML servicios Web.

back to the top

Crear un servicio Web

En esta sección, se crea un servicio Web XML que implementa el teorema theorem.
  1. Crear un nuevo servicio Web ASP.NET en Visual Basic .NET o en Visual Basic 2005 como sigue:
    1. Inicie Visual Studio .NET o Visual Studio 2005 y, a continuación, haga clic en Nuevo proyecto .
    2. En Tipos de proyecto , haga clic en Proyectos de Visual Basic . En plantillas , haga clic en Servicio Web ASP.NET .

      Nota En Visual Studio 2005, haga clic en Visual Basic bajo Tipos de proyecto .
    3. En el cuadro de texto nombre , escriba PythagoreanTheoremWS .
  2. Cambie a la ventana de código para Service1.asmx. Para ello, haga clic con el botón secundario en Service1.asmx en el Explorador de soluciones y, a continuación, haga clic en Ver código .
  3. Agregue el código siguiente antes de la instrucción End Class para crear una nueva función:
    Public Function PythagoreanTheorem(ByVal a As Double, _             ByVal b As Double) As DoubleEnd Function					
  4. El teorema theorem indica que el cuadrado de la hipotenusa de un triángulo es igual a la suma de los cuadrados de los otros dos lados. Agregue el código siguiente dentro de la función PythagoreanTheorem para implementar esta fórmula matemática:
    Dim dblSum As Double        dblSum = a ^ 2 + b ^ 2        Return Math.Sqrt(dblSum)					
  5. Esta función implementará totalmente theorem el teorema. Sin embargo, la función no es todavía un método de servicio Web. Para exponer una función como un método de servicio Web, agregue el atributo WebMethod a la declaración del método. La función completa debería aparecer como sigue:
    <WebMethod()> _    Public Function PythagoreanTheorem(ByVal a As Double, _             ByVal b As Double) As Double        Dim dblSum As Double        dblSum = a ^ 2 + b ^ 2        Return Math.Sqrt(dblSum)    End Function					
  6. En el menú Generar , haga clic en Generar solución para compilar este servicio Web.
back to the top

Utilizar el servicio Web

En esta sección, cree una aplicación para Windows que utiliza este servicio Web.
  1. Crear un nuevo proyecto de aplicación de consola en Visual Basic .NET o en Visual Basic 2005 para probar el servicio Web que creó en la sección anterior.
  2. Para tener acceso a un servicio Web desde una aplicación cliente, el cliente debe incluir primero una referencia al servicio Web. Para agregar un Web de referencia, abrir la ventana Explorador de soluciones, haga clic con el botón secundario en el proyecto y, a continuación, haga clic en Agregar referencia Web .
  3. En el cuadro de diálogo Agregar referencia Web , haga clic en Referencias Web en el servidor local . Visual Studio .NET o Visual Studio 2005 busca en el equipo local para cualquier servicio Web disponible. Esto puede tardar unos minutos.
  4. En la sección de Referencias disponibles , haga clic en http://localhost/PythagoreanTheorem/PythagoreanTheorem.vsdisco y, a continuación, haga clic en Agregar referencia .
  5. Cambie a la ventana código de Module1.vb y agregue el código siguiente al procedimiento Sub Main :
        Dim hypotenuse As Double    Dim ws As New localhost.Service1()    'Pythagorean Triple: 3, 4, 5    hypotenuse = ws.PythagoreanTheorem(3, 4)    Console.WriteLine(hypotenuse)    'Pythagorean Triple: 5, 12, 13    hypotenuse = ws.PythagoreanTheorem(5, 12)    Console.WriteLine(hypotenuse)    'Pythagorean Triple: 7, 24, 25    hypotenuse = ws.PythagoreanTheorem(7, 24)    Console.WriteLine(hypotenuse)    Console.Read()					
  6. En el menú Depurar , haga clic en iniciar para ejecutar la aplicación. La ventana de consola muestra el resultado siguiente:
    51325						
back to the top

Listado de código completo

Imports System.Web.Services<WebService(Namespace := "http://tempuri.org/")> _Public Class Service1    Inherits System.Web.Services.WebService#Region " Web Services Designer Generated Code "    Public Sub New()        MyBase.New()        'The Web Services Designer requires this call.        InitializeComponent()        'Add your own initialization code after the InitializeComponent() call.    End Sub    'The Web Services Designer requires this code.    Private components As System.ComponentModel.IContainer    'NOTE: The Web Services Designer requires this procedure.    'You can use the Web Services Designer to modify the procedure.     'However, do not use the Code editor to modify it.    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()        components = New System.ComponentModel.Container()    End Sub    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)        'CODEGEN: The Web Services Designer requires this procedure.        'Do not use the Code editor to modify it.        If disposing Then            If Not (components Is Nothing) Then                components.Dispose()            End If        End If        MyBase.Dispose(disposing)    End Sub#End Region    ' WEB SERVICE EXAMPLE    ' The HelloWorld() sample Web service returns the string Hello World.    ' To build, uncomment the following lines, and then save and build the project.    ' To test this Web service, ensure that the .asmx file is the start page,    ' and then press F5.    '    '<WebMethod()> Public Function HelloWorld() As String    '	HelloWorld = "Hello World"    ' End Function    <WebMethod()> _    Public Function PythagoreanTheorem(ByVal a As Double, ByVal b As Double) As Double        Dim dblSum As Double        dblSum = a ^ 2 + b ^ 2        Return Math.Sqrt(dblSum)            End FunctionEnd ClassModule Module1      Sub Main()    Dim hypotenuse As Double    Dim ws As New localhost.Service1()    'Pythagorean Triple: 3, 4, 5    hypotenuse = ws.PythagoreanTheorem(3, 4)    Console.WriteLine(hypotenuse)    'Pythagorean Triple: 5, 12, 13    hypotenuse = ws.PythagoreanTheorem(5, 12)    Console.WriteLine(hypotenuse)    'Pythagorean Triple: 7, 24, 25    hypotenuse = ws.PythagoreanTheorem(7, 24)    Console.WriteLine(hypotenuse)    Console.Read()  End SubEnd Module				
back to the top
Referencias
Para obtener más información, visite los siguientes sitios Web de Microsoft (pueden estar en inglés): back to the top
consumir

Advertencia: este artículo se tradujo automáticamente

Propiedades

Id. de artículo: 315935 - Última revisión: 12/06/2006 23:18:59 - Revisión: 5.5

Microsoft Visual Basic 2005, Microsoft Visual Basic .NET 2003 Standard Edition, Microsoft Visual Basic .NET 2002 Standard Edition

  • kbmt kbvs2005swept kbvs2005applies kbhowtomaster KB315935 KbMtes
Comentarios
].appendChild(m);