OoOoBuRRioOoO
Babos@
- Registrado
- 2006/03/25
- Mensajes
- 1.052
- Sexo
- MOH
buenas,
Estoy tratando de enviar una factura electrónica al SII, solo me falta el envío, pero al momento de enviarla y querer recuperar la respuesta(para saber el estado del envío) me salta este mensaje:
Debe escribir ContentLength bytes en el flujo de la solicitud antes de llamar a [Begin]GetResponse.
El error se produce en la siguiente linea :
Dim response As HttpWebResponse = CType(request.GetResponse(), HttpWebResponse)
este es el codigo
:
Algún master en programación que sepa como solucionarlo?
es .net
desde ya, gracias.
EDIT: ya lo solucioné, trancrivi mla el código XD
Estoy tratando de enviar una factura electrónica al SII, solo me falta el envío, pero al momento de enviarla y querer recuperar la respuesta(para saber el estado del envío) me salta este mensaje:
Debe escribir ContentLength bytes en el flujo de la solicitud antes de llamar a [Begin]GetResponse.
El error se produce en la siguiente linea :
Dim response As HttpWebResponse = CType(request.GetResponse(), HttpWebResponse)
este es el codigo
Código:
Dim request As HttpWebRequest = CType(WebRequest.Create(pUrl), HttpWebRequest)
request.Method = pMethod
request.Accept = pAccept
request.Referer = pReferer
request.ContentType = "multipart/form-data: boundary=7d23e2a11301c4"
request.ContentLength = secuencia.Length
request.Headers.Add("Accept-Language", "es-cl")
request.Headers.Add("Accept-Encoding", "gzip, deflate")
request.Headers.Add("Cache-Control", "no-cache")
request.Headers.Add("Cookie", String.Format(pToken, _TOUKEN_)) 'aquí va el token entregado por el SII
request.UserAgent = "Mozilla/4.0 (compatible; PROG 1.0; Windows NT 5.0; YComp 5.0.2.4)"
request.KeepAlive = True
' Recupere el streamwriter para escribir la secuencia
Try
Dim sw As StreamWriter = New StreamWriter(request.GetRequestStream(), Encoding.GetEncoding("ISO-8859-1"))
sw.Write(secuencia.ToString())
Catch ex As Exception
MsgBox("Error en metodo o forma de Envio")
End Try
Dim respuestaSii As String = String.Empty
'
'//// Recupere la respuesta del sii
Dim response As HttpWebResponse = CType(request.GetResponse(), HttpWebResponse)
Dim sr As StreamReader = New StreamReader(response.GetResponseStream())
respuestaSii = sr.ReadToEnd().Trim()
MsgBox(respuestaSii)
Algún master en programación que sepa como solucionarlo?
es .net
desde ya, gracias.
EDIT: ya lo solucioné, trancrivi mla el código XD
Última edición: