我的大厅设有视频信息亭设置,可让人们检查并打印带有图片,名称等的徽章。还有一个远程支持工具,有时会崩溃。我在自助服务终端上有一个修复此问题的功能,但您必须立即前往自助服务终端触发它。
我还编写了一个管理工具,它使用WMI来监控和管理自助服务终端的其他一些方面。我希望能够通过此应用程序触发此修复功能。我花了无数个小时在谷歌试图弄清楚没有运气。也许我不是在寻找合适的东西。
我的问题是这个。在C#中,如何通过网络从管理应用程序调用我的kiosk应用程序中的修复功能?
答案 0 :(得分:2)
好的,在我的Server
表单上,我有BackgroundWorker运行TcpListener。您需要将此TcpListener放在BackgroundWorker中,否则在接受TcpClient之前,您将永远无法阻止它执行。
此外,您将需要处理在主执行线程中从此后台线程接收的任何数据,以防止跨线程异常:
private TcpListener _listener;
private const int port = 8000;
private void Worker_TcpListener(object sender, DoWorkEventArgs e) {
BackgroundWorker worker = sender as BackgroundWorker;
do {
try {
_listener = new TcpListener(IPAddress.Any, port);
_listener.Start();
TcpClient client = _listener.AcceptTcpClient(); // waits until data is avaiable
int MAX = client.ReceiveBufferSize;
NetworkStream stream = client.GetStream();
Byte[] buffer = new Byte[MAX];
int len = stream.Read(buffer, 0, MAX);
if (0 < len) {
string data = Encoding.UTF8.GetString(buffer);
worker.ReportProgress(len, data.Substring(0, len));
}
stream.Close();
client.Close();
} catch (SocketException) {
// See MSDN: Windows Sockets V2 API Error Code Doc for details of error code
} catch (ThreadAbortException) { // If I have to call Abort on this thread
return;
} finally {
_listener.Stop();
}
} while (!worker.CancellationPending);
}
这对大型消息(如JPEG文件等)不利,但对于我在特殊数据中编码的短字符串非常有用。
此数据将被发送回我的主要执行线程(使用ReportProcess
方法)处理数据:
private void Worker_TcpListener(object sender, ProgressChangedEventArgs e) {
if (e.UserState != null) {
int len = e.ProgressPercentage;
string data = e.UserState.ToString();
if (!String.IsNullOrEmpty(data) && (3 < len)) {
string head = data.Substring(0, 3);
string item = data.Substring(3);
if (!String.IsNullOrEmpty(item)) {
if (head == "BP:") {
string[] split = data.Split(';');
if (2 < split.Length) {
string box = split[0].Substring(3); // Box Number
string qty = split[1].Substring(2); // Quantity
string customer = split[2].Substring(2); // Customer Name
MyRoutine(box, qty, customer);
}
}
}
}
}
}
上面的代码只是一整天都在运行。
与此同时,我厂内大约有10台Pocket PC设备可以随时发送数据。它们的代码是用VB编写的,我真的希望我有时间完成我的C#版本,但这里是:
Private Sub SendToServer(string serialNum, int qty, string customer)
Cursor.Current = Cursors.WaitCursor
Try
Dim strPacket As String = String.Format("BP:{0};Q:{1};C:{2};", serialNum, qty, customer)
Dim colon As Integer = p7_txtIPAddress.Text.IndexOf(":")
Dim host As String = p7_txtIPAddress.Text.Substring(0, colon)
Dim port As Integer = CInt(p7_txtIPAddress.Text.Substring(colon + 1))
Dim dataPacket As [Byte]() = Encoding.ASCII.GetBytes(strPacket)
Using client As New TcpClient(host, port)
Dim stream As NetworkStream = client.GetStream()
stream.Write(dataPacket, 0, dataPacket.Length)
End Using
Catch err As Exception
MessageBox.Show(err.Message, "Print To Server TCP Error")
Finally
Cursor.Current = Cursors.Default
End Try
End Function
我不知道这是不是你想要做的,但它有效且可靠。
显然,我在生产中的代码更大,包括其他你不会觉得有用的东西(即员工验证,错误记录器等)。我已经削减了很多这些,我希望我没有删除任何必要的东西。
这应该让你知道如何向前推进,至少。