NASýL YAPýLýR: Program kullanarak bir yazýcý ve yazýcý baðlantý noktasý PrinterAdmin (Prnadmin.dll) kullanarak Microsoft Windows 2000'de Visual Basic komut dosyasý ile oluþtur

Bu adým adým makalede, Microsoft Windows 2000'de PrinterAdmin aracýný (Prnadmin.dll) ve bir Visual Basic komut dosyasý kullanarak bir yazýcý ve yazýcý baðlantý noktasý programsal olarak oluþturmak açýklamaktadýr.

Prnadmin.dll'e genel bakýþ

Microsoft Windows 2000 Kaynak Seti'nde PrinterAdmin kullanýlabilir. Bu yöneticilerin, yazýcýlar, sürücüler ve Windows 2000 tabanlý bilgisayarlarda yerel ve uzak baðlantý noktalarý'ný yönetmek için kullanabileceðiniz bir Bileþen Nesne Modeli (COM tabanlý aracýdýr. PrinterAdmin büyük ölçekli, etkileþimli olmayan komut dosyalarý, yazýcýlarý denetim saðlar. Kendi komut dosyalarýnýzý oluþturmak veya aþaðýdaki görevleri gerçekleþtirmek için PrinterAdmin ile saðlanan örnek komut dosyalarýndan birini deðiþtirebilirsiniz:

• Ekleyin ve sonra yazýcýyý silin.
• Ekleme ve bir yazýcý sürücüsü silinemiyor.
• Ekleme ve bir yazýcý baðlantý noktasýný silmek.
• Ekleme ve bir formu silmek.
• Yazýcý baðlantý noktalarý, sürücüleri ve form listesi, belirli bir bilgisayarda görüntüleyin.
• Denetim ve Yazýcýlar'ý yapýlandýrýn.
• Bir sýnama sayfasý yazdýrýn.
• Yazdýrma sunucusu kopyalanamadý.

Visual Basic komut dosyasý bu makaledeki örnek Prnadmin.dll uzaktan Windows 2000 tabanlý bilgisayarlarda bir yazýcý ve yazýcý baðlantý noktasý eklemek için nasýl kullanýlacaðýný gösterir. Komut dosyasý, þu görevleri gerçekleþtirir:

• Yeni bir baðlantý noktasý, istemci bilgisayarda oluþturur. Bu örnekte, baðlantý noktasý bilgisayarýn sabit diskindeki C:\MyFolder\MyPort klasörüne iþaret eder.
• Istemci bilgisayar üzerinde yeni bir baðlantý noktasý kullanan bir yazýcýya yükler.
• (,, Yeni yazýcýya gönderilen belgeleri depolamak), istemci bilgisayarýn sabit diskindeki bir C:\MyFolder klasörü oluþturur.

Visual Basic komut dosyasý ile Prnadmin.dll kullanarak bir yazýcý ve yazýcý baðlantý noktasý ekleme

1. Not Defteri'ni baþlatýn ve sonra da yeni bir metin dosyasý açýn.
2. Kopyalayýn ve metin dosyasýna aþaðýdaki satýrlarý yapýþtýrýn:
   
   Not: Prnadmin.dll kullanmak için <a0></a0>, istemci bilgisayarda kayýtlý. Komut dosyasýný sunucuda konumundan Prnadmin.dll kaydeder. \\Servername\Foldername sunucunuzdaki Prnadmin.dll dosyasýnýn doðru yolunu deðiþtirme emin olun.

   
   '******** Register prnadmin.dll file on client computer *******
   
   Set WshShell = Wscript.CreateObject("Wscript.Shell")
   
   WshShell.Run "regsvr32 /s \\ServerName\FolderName\Prnadmin.dll",1,TRUE
   
   '************** Create the port first *******************************
   
   dim oPort
   
   dim oMaster
   
   set oPort = CreateObject("Port.Port.1")
   
   set oMaster = CreateObject("PrintMaster.PrintMaster.1")
   
   oPort.PortName = "C:\MyFolder\MyPort"
   
   oPort.PortType = 3
   
   oMaster.PortAdd oPort
   
   if Err <> 0 then
   
   msgbox "There was an error creating the port."
   
   end if
   
   '********************************************************************
   
   '************** Create the printer second ***************************
   'Change MyPrinter to the name of the printer that you are adding.
   'Change PrinterDriver to the name of the printer driver that you are adding.
   
   
   dim oPrinter
   
   set oPrinter = CreateObject("Printer.Printer.1")
   
   oPrinter.PrinterName = "MyPrinter"		' name of the printer as it appears in the Printers folder
   
   oPrinter.DriverName = "PrinterDriver"		' name that is referenced in ntprint.inf
   
   oPrinter.PortName = "C:\MyFolder\MyPort"		' Specify a port name. Can also point to LPT or COM port.
   
   oMaster.PrinterAdd oPrinter
   If Err <> 0 then
   
   msgbox "There was an error creating the printer."
   
   end if
   
   '********************************************************************
   
   '************** Create the directory third ***************************
   
   Dim filesys
   
   Set filesys = wscript.createobject("Scripting.FilesystemObject")
   
   filesys.CreateFolder "C:\MyFolder\"			' Create a folder as a repository for the faxes.
   
   If Err <> 0 then
   
   msgbox "There was an error creating the MyFolder folder."
   
   end if
   
   '********************************************************************
   
   msgbox "The script is finished."
   
   					

3. Komut dosyasý (gerekirse), gereksinimlerinizi karþýlayacak þekilde özelleþtirebilirsiniz.
4. Dosya menüsünden farklý Kaydet ' i týklatýn. Komut dosyasýný .vbs dosya adý uzantýsýný (örneðin, MyPrinter.vbs) kullanarak Dosya adý kutusuna bir ad, dosyayý kaydedin ve sonra Kaydet'i týklatýn istediðiniz konumu belirtin ve türü.
   
   Not: t?rnak i?aretleri eklediðinizden emin olun ("") dosya adýný yazdýðýnýzda. Bu eylem, dosyayý .vbs dosya adý uzantýsýyla oluþturur.
5. Not Defteri'ni kapatýn.
6. Komut dosyasý, kullanýcýlarýn bilgisayarlarýna daðýtabilirsiniz.
   
   Komut dosyasýný çalýþtýrdýðýnýzda, yeni bir baðlantý oluþturulur, yazýcýya yüklenir ve yazýcýda istemci bilgisayarýn Yazýcýlar klasöründe görünür.

PrinterAdmin aracý hakkýnda daha fazla bilgi için Windows 2000 Kaynak Seti'nde kullanýlabilir olan Prnadmin.doc dosyasýna bakýn. (Windows 2000 Kaynak Seti varsayýlan konumuna yüklenmiþse) Prnadmin.doc dosya Program Files\Resource Seti klasöründe bulunur.

Windows 2000 Resource Kit hakkýnda daha fazla bilgi için aþaðýdaki Microsoft Web sitesini ziyaret edin: Bir Visual Basic komut dosyasý kullanarak, varsayýlan yazýcý ekleme hakkýnda ek bilgi için Microsoft Knowledge Base'deki makaleyi görüntülemek üzere aþaðýdaki makale numarasýný týklatýn: Windows NT 4.0 ve Windows 2000 bilgisayarlarý arasýndaki bir yazdýrma sunucusu yapýlandýrma geçme hakkýnda ek bilgi için Microsoft Knowledge Base'deki makaleyi görüntülemek üzere aþaðýdaki makale numarasýný týklatýn: