View Full Version : سوال: تنظیم 2 پرینتر
saeedzx
دوشنبه 04 آبان 1388, 10:22 صبح
سلام
من میخواستم برنامه ای بنویسم که ازش چاپ بگیرم
حالا من اینجا 2 تا پرینتر دارم
می خوام تنظیم دستی کنم که موقع چاپ دیگه از من نپورسه که 2 تا پرینتر و باکدوم یکی میخوای چاپ بگیری
mpmsoft
دوشنبه 04 آبان 1388, 10:25 صبح
جهت بدست آوردن چاپگرهای تعریف شده بروی سیستم
For Each Pr In Printers
Combo1.AddItem Pr.DeviceName
Next
جهت انتخاب چاپگر
Private Sub Combo1_Click()
On Error Resume Next
Dim prThis As Printer
If Printers.Count > 0 Then
For Each prThis In Printers
If prThis.DeviceName = Combo1.Text Then
Set Printer = prThis
Exit For
End If
Next prThis
End If
End Sub
saeedzx
دوشنبه 04 آبان 1388, 10:29 صبح
تشکر فراوان
حالا 1 سوال دیگه من می خوام با دیتا ریپور چاپ بگیرم و نمی خوام موقع چاپ صفحه رو نمایش بده
mpmsoft
دوشنبه 04 آبان 1388, 10:34 صبح
DataReport1.PrintReport False, rptRangeAllPages
sohrab o
یک شنبه 01 فروردین 1389, 14:56 عصر
من با datareport می خواستم پاپ کنم اما نتونستم چاپگرو انتخاب کنم
sohrab o
یک شنبه 01 فروردین 1389, 15:03 عصر
یه سورس توپی پیدا کردم
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.