Notice: Undefined offset: 2 in /home2/icentarb/public_html/icentar/classes/class.permissions.php on line 735
Private Sub Form_Load() Dim CommPort As String msComm1.CommPort = 1 ' Opcija porta msComm1.Settings = "4800,N,8,1" If CommPort <> "" Then msComm1.CommPort = CommPort msComm1.PortOpen = True msComm1.DTREnable = True msComm1.RTSEnable = True msComm1.RThreshold = 1 ' Generate a receive