Public Shared Function StartAccepting(ByVal intTime As Integer) As Boolean Dim ret As Boolean Dim time As Integer = intTime Dim strTmp(300) As Byte Dim strStr As String Dim enc As New System.Text.ASCIIEncoding() Try ret = RunAccept(time, strTmp(0)) strStr = enc.GetString(strTmp) If ret Then Return True Else Return False End If Catch ex As Exception MsgBox("Error opening:ExMsg-" & ex.Message) Return False End Try End Function
Dim strTmp(300) As Byte
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)