62,072
社区成员
发帖
与我相关
我的任务
分享未安装打印机错误
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
' Try
' Assumes the default printer.
Dim pd As New PrintDocument()
AddHandler pd.PrintPage, AddressOf Me.pd_PrintPage
pd.Print()
' Catch ex As Exception
' End Try
End Sub
Private Sub pd_PrintPage(ByVal sender As Object, ByVal ev As PrintPageEventArgs)
' Draw a picture.
ev.Graphics.DrawImage(Image.FromFile("C:\myfile.bmp"), _
ev.Graphics.VisibleClipBounds)
' Indicate that this is the last page to print.
ev.HasMorePages = False
End Sub
asp.net这样可以吗？？提示我未安装打印机，请问那里有错误！我这个在vb.net程序中策是通过
' Try
' Assumes the default printer.
Dim pd As New PrintDocument()
AddHandler pd.PrintPage, AddressOf Me.pd_PrintPage
pd.Print()
' Catch ex As Exception
' End Try
End Sub
Private Sub pd_PrintPage(ByVal sender As Object, ByVal ev As PrintPageEventArgs)
' Draw a picture.
ev.Graphics.DrawImage(Image.FromFile("C:\myfile.bmp"), _
ev.Graphics.VisibleClipBounds)
' Indicate that this is the last page to print.
ev.HasMorePages = False
End Sub
asp.net这样可以吗？？提示我未安装打印机，请问那里有错误！我这个在vb.net程序中策是通过
...全文
请发表友善的回复…
发表回复
ETstudio 2003-08-13
- 打赏
- 举报
是你的系统没有装打印服务而造成的，程序并没有错
