Ver Mensaje Individual
  #1 (permalink)  
Antiguo 17/06/2009, 09:48
juanes222
 
Fecha de Ingreso: septiembre-2005
Ubicación: Medellin
Mensajes: 215
Antigüedad: 19 años, 4 meses
Puntos: 0
La configuración para obtener acceso a la impresora '\\10.0.0.113\hp LaserJet 100

Saludos, es que tengo un problemita desde hace un buen tiempo al intentar imprimir desde un servidor WEB, me regresa el error "La configuración para obtener acceso a la impresora '\\10.0.0.113\hp LaserJet 100" justo cuando llamo al DocImp.Print() porfavor si alguien sabe como solucionar este problema selo agradeceré muuuucho de verdad es bn importante, muchas grácias.



Imports System.Drawing
Imports System.Drawing.Printing
Imports System.Data
Imports System.Data.SqlClient

Partial Class _Default
Inherits System.Web.UI.Page
Private WithEvents DocImp As New PrintDocument

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

End Sub

Private Sub DocImp_PrintPage(ByVal sender As Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles DocImp.PrintPage
Dim Fuente As Font, Sql As String, Fila As DataRow, Adapter As SqlDataAdapter, NomEle As String
Dim Formato As New StringFormat, Margen As New Margins(15, 0, 0, 10), Alto As Int16, Cont As Int16
Fuente = New Font("Arial", 10, FontStyle.Bold)
Formato.Alignment = StringAlignment.Center
e.Graphics.PageUnit = GraphicsUnit.Millimeter
e.PageSettings.Margins = Margen
e.Graphics.DrawString("TEXTO", Fuente, Brushes.Black, New System.Drawing.RectangleF(58, 5, 100, 4), Formato)
e.HasMorePages = False
Fuente.Dispose()
End Sub

Protected Sub cmdImprimir_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdImprimir.Click
Try
DocImp.PrinterSettings.PrinterName = "\\10.0.0.113\hp LaserJet 1000"
DocImp.Print()
Catch ex As Exception
LblMsg.Text = ex.Message
End Try
End Sub

End Class


No se si ya será cuestión de permisos o que pero pss todas las opciones debo probarlas, gracias de nuevo.
__________________
JU4N35