Skip to main content
Submitted by ashwin_009 on Wed, 08/12/2015 - 23:23

Hello i have been trying to develop a program in VB6 using active x tool kit. I was able to communicate with galil during the first time i ran the program. But after that i dont get any response from galil controller. This is the code i used to in VB

Private Sub Form_Load()
DMCShell1.DMCController = 1
DMCShell1.DMCConnect = True 'Connect to controller 1

DMCShell1.DMCCommand = Chr$(18) + Chr$(22) 'Get model number
Text1.Text = "Connected to: " + DMCShell1.DMCResponse

DMCShell1.DMCCommand = "MG _BN" 'Get serial number
Text1.Text = Text1.Text + "Serial number: " + DMCShell1.DMCResponse

End Sub

Private Sub Form_Unload(Cancel As Integer)
DMCShell1.DMCConnect = False
End Sub

Comments 1

troym_galil on 08/13/2015 - 16:08