Jump to content

Consumir web service mediante vb.net


Fredi

Recommended Posts

Hola, mi problema es que necesito consumir el web service de prestashop mediante un programa que estoy desarrollando con vb.net, pude encontrar el siguiente código que según veo solo es para leer dicho web service, pero no se acoplarlo, no se como llamarlo desde un form, comparto el código:

 

######################################################################################

 

Imports System.Net

Imports System.Xml

Imports System.IO

Imports System.Text

Imports System.Web

 

Public Class Prestashop_WebClient

 

Private WebService_URL As String = "http://miweb.com/api"

Private WebService_LoginName As String = "UPKES78K0ODWAY7L1PO5OZQAYJIIACZZ"

Private WebService_Password As String = ""

 

Private Class CRUDMethod

Public Shared Create As String = "POST"

Public Shared Read As String = "GET"

Public Shared Update As String = "PUT"

Public Shared Delete As String = "DELETE"

End Class

 

Private Function ReadRecord(ByVal TableName As String, ByVal UniqueID As String) As String

Try

Dim RequestURL As String = WebService_URL & "/" & TableName & "/" & UniqueID

Dim webRequest As HttpWebRequest = DirectCast(System.Net.WebRequest.Create(RequestURL), HttpWebRequest)

 

webRequest.Method = CRUDMethod.Read

webRequest.ContentType = "application/xml"

webRequest.Credentials = New NetworkCredential(WebService_LoginName, WebService_Password)

 

Dim response As HttpWebResponse = DirectCast(webRequest.GetResponse(), HttpWebResponse)

Dim reader As StreamReader = New StreamReader(response.GetResponseStream())

Dim strData As String = reader.ReadToEnd()

reader.Close()

Return strData

 

Catch ex As Exception

 

MsgBox("ReadRecord-" & ex.Message)

 

Return ""

 

End Try

 

End Class

 

#############################################################################

 

El codigo es tal cual lo ví, aunque hay cosas que no las veo bien, como no cerrar la funcion o un Class tambien sin cerrar.

 

La documentación de PrestaShop sobre esots temas es practicamente nula, como funciona el web service de prestashop lo tengo claro, pues por navegador si que sale la tabla que he activado desde el backoffice de prestashop para darle todos los derechos por web service.

 

Agradeceria mucho vuestra ayuda.

 

Saludos

Link to comment
Share on other sites

×
×
  • Create New...