hi guys,
ive written a script used for driver changes or for when we move printers to different print servers. Ive tested it and it works fine. I wish to make one amendment and thats to make teh printer default once added.
any ideas
test1
Sub subRemovePrinters(strServer)
Dim strPrinters...
ive sorted it now. was just a matter of getting my head round it. ive goen with the following.
Public Declare Function WritePrivateProfileString _
Lib "kernel32" Alias "WritePrivateProfileStringA" _
(ByVal lpSectionName As String, _
ByVal lpKeyName As Any, _...
my code is as follows.
[highlight #D3D7CF]Public Function IniFileName() As String
IniFileName = "c:\test\copitrak.ini"
End Function
Private Function WriteIniFileString(ByVal Sect As String, ByVal Keyname As String, ByVal Wstr As String) As String
Dim Worked As Long
iNoOfCharInIni = 0...
Hi guys,
i am currently trying to write a new macro for my users. I need to have two buttons that basically just print to a defined printer. That part is easy.
One of these buttons needs to write the value #letterhead# to a .ini file whenever it prints and the other has to write remove that...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.