I'm copying a known working print system from a client's computer to mine for further development.
The setup is
Database location : C:\Users\David\Order Tracker
or \\Acer\David\ Order Tracker
Print Executable : C:\Users\David\printGyleLabels.exe
Printer share name : hp1005 on Acer
Command button : cmdTest
The cursor wheel goes round for a few seconds then nothing else happens.
The setup is
Database location : C:\Users\David\Order Tracker
or \\Acer\David\ Order Tracker
Print Executable : C:\Users\David\printGyleLabels.exe
Printer share name : hp1005 on Acer
Command button : cmdTest
Code:
Private Sub cmdTest_Click()
On Error GoTo Err_cmdPrintGyleLabel_Click
Dim stAppName As String
Dim intGyleID As Integer
intGyleID = Me!GyleID
stAppName = "C:\Users\David\printGyleLabels.exe " & """\\Acer\David\Order Tracker.mdb""" & " " & """\\acer\hp1005""" & " " & intGyleID
Call Shell(stAppName, 1)
Exit_cmdPrintGyleLabel_Click:
Exit Sub
Err_cmdPrintGyleLabel_Click:
MsgBox Err.Description
Resume Exit_cmdPrintGyleLabel_Click
End Sub
The cursor wheel goes round for a few seconds then nothing else happens.