| |
| https: |
| static byte[] DOON = new byte[] { 0x00, 0x01, 0x00, 0x00, 0x00, 0x06, 0xFF, 0x05, 0x00, 0x64, 0xFF, 0x00 }; |
| static byte[] DOOFF = new byte[] { 0x00, 0x01, 0x00, 0x00, 0x00, 0x06, 0xFF, 0x05, 0x00, 0x64, 0x00, 0x00 }; |
//按钮事件执行Demo:产品烘烤48h报警
private void bt_bake_Click(object sender, EventArgs e)
{
//烘烤中,sysdate-start_time > 48h(2880min)---需要报警
string sql = "";
sql = "select sajet.bake_time1 result from dual";
//数据库中function:bake_time1
点击查看代码
| CREATE OR REPLACE FUNCTION bake_time1 RETURN VARCHAR IS |
| |
| v_result VARCHAR2(100); |
| v_cnt NUMBER; |
| BEGIN |
| |
| v_result := 'OK'; |
| select count(1) |
| into v_cnt |
| from Bake_Master |
| where 1 = 1 |
| and status='0' |
| and 2880-round((sysdate-start_time)*24*60,0) <= 0; |
| |
| |
| IF v_cnt > 0 THEN |
| v_result := 'NG'; |
| END IF; |
| |
| return v_result; |
| |
| |
| END; |
| DataTable dt_count = DBHelp.Get_DataTable(DBHelp.ConnMES, sql); |
| if (dt_count.Rows[0][0].ToString() == "NG") |
| { |
| MessageBox.Show("烘烤时间已过48H!!!"); |
| StreamWriter writer = File.AppendText(@"E:\bake.txt"); |
| writer.WriteLine(DateTime.Now.ToString("yyyy/MM/dd HH:mm:ss") + " 烘烤报警!!!"); |
| writer.Close(); |
| sendSignal(1, "网络继电器IP地址", DOON); |
| } |
| else |
| { |
| MessageBox.Show("报警解除!!!"); |
| StreamWriter writer = File.AppendText(@"E:\bake.txt"); |
| writer.WriteLine(DateTime.Now.ToString("yyyy/MM/dd HH:mm:ss") + " 烘烤报警已解除!"); |
| writer.Close(); |
| sendSignal(1, "网络继电器IP地址", DOOFF); |
| } |
| } |
| |
| |
| |
| public static void sendSignal(int status, string strip, byte[] cmd) |
| { |
| try |
| { |
| Socket s = new Socket(AddressFamily.InterNetwork, SocketType.Stream, ProtocolType.Tcp); |
| IPAddress ip = IPAddress.Parse(strip); |
| IPEndPoint ipe = new IPEndPoint(ip, 502); |
| s.Connect(ipe); |
| |
| s.Send(cmd); |
| s.Close(); |
| } |
| catch (Exception) |
| { |
| |
| |
| } |
| } |
【推荐】国内首个AI IDE,深度理解中文开发场景,立即下载体验Trae
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· 全程不用写代码,我用AI程序员写了一个飞机大战
· DeepSeek 开源周回顾「GitHub 热点速览」
· 记一次.NET内存居高不下排查解决与启示
· MongoDB 8.0这个新功能碉堡了,比商业数据库还牛
· .NET10 - 预览版1新功能体验(一)