 |
|
C# ตัวอย่าง top 100 ตัวอย่าง จากเว็บ csharphelper ครับ |
|
 |
|
|
 |
 |
|
ในลิงค์ไม่เห็นมีที่ download
|
 |
 |
 |
 |
Date :
2019-05-03 08:38:42 |
By :
Chaidhanan |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
แก้ลิ้งค์ให้ครับ => top100src.rar
|
 |
 |
 |
 |
Date :
2019-05-03 14:22:50 |
By :
mr.win |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
แจกมั่ง 5 G กำลังจะมา องค์ความรู้พอพอกันหมด นับหนึ่ง
กำลังหาวิธีการเก็บข้อมูลทุกฯ 1 วินาที x จำนวนอุปกรณ์ + DATA
(เขียนลงหลายฯ RDBMS พร้อมฯกัน)
Code (C#)
namespace ConsoleApp3
{
class Program
{
static void Main(string[] args)
{
ClientReceiveTest();
}
public static void ClientReceiveTest()
{
var receivedMessage = false;
// create the client
//var client = new MQTTClient("test.mosquitto.org", 1883);
var client = new MQTTClient("69.96.69.96", 1883);
// hook up the MessageReceived event with a handler
client.MessageReceived += (topic, qos, payload) =>
{
Debug.WriteLine("RX: " + topic); //ห่าเหวอะไรก็ว่ากันไป
//Write to RDBMS/Time Series Database
receivedMessage = true;
};
var i = 0;
// connect to the MQTT server
client.Connect("หิวหอย6969", "UserName", "Password");
// wait for the connection to complete
while (!client.IsConnected)
{
Thread.Sleep(1000);
if (i++ > 10) break;
}
// add a subscription
client.Subscriptions.Add(new Subscription("wise/data"));
i = 0;
while (true)
{
if (receivedMessage)
break;
Thread.Sleep(1000);
// publish on our own subscribed topic to see if we hear what we send
//client.Publish("Topic/Test/หิวหอย", "Hello World", QoS.FireAndForget, false);
//if (i++ > 10) break;
}
}
}
}
|
 |
 |
 |
 |
Date :
2019-05-03 16:23:12 |
By :
หน้าฮี |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
delegate --> lampda
Code (C#)
client.MessageReceived += (topic, qos, payload) =>
{
Debug.WriteLine("RX: " + topic);
receivedMessage = true;
};
สำหรับ VB.NET มันก็จะเขียนได้ดังนี้ (Anonymouse Lampda Delegate)
Code (VB.NET)
AddHandler client.MessageReceived , Sub(topic, qos, payload)
Debug.WriteLine("RX" + topic)
receivedMessage = True
End Sub
|
 |
 |
 |
 |
Date :
2019-05-04 19:29:14 |
By :
หน้าฮี |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ON THE FLY เอาให้ชัดชัดชัด
Code (VB.NET)
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'ass0 = sender As Object (ใช้ sender ไม่ได้เพราะมันซ้ำ ต้องเปลี่ยนชื่อ แต่มันคือสิ่งเดียวกัน (คนละ Object)
'ass1 = e As EventArgs (ใช้ sender ไม่ได้เพราะมันซ้ำ ต้องเปลี่ยนชื่อ แต่มันคือสิ่งเดียวกัน (คนละ Object)
AddHandler btnSendData.Click, Sub(ass0 As Object, ass1 As EventArgs)
MsgBox("Hi Hi Hi")
End Sub
End Sub
|
 |
 |
 |
 |
Date :
2019-05-04 19:33:38 |
By :
หน้าฮี |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
เล่าเรื่องจริงและน่าอับอายให้ฟัง เมื่อคืนมีเงินติดกะเป๋า 8500 บาท
โดนสาวน้อยหลอกแดกจนหมดตูด ไม่เหลือกลับบ้านแม้แต่บาทเดียว
นั่งลำพึงลำพัน เซี้ยเอ้ย ซื้อมาม่า ซองละ 5 บาทคิดแล้วคิดอีก ซื้อสบู่ก้อนไม่ถึงสิบบาท คิดแล้วคิดอีก
ทีเรื่องแบบนี้ ไม่ต้องคิดอะไร และไม่เคยเข็ด/หลาบจำ
...
...
...
|
 |
 |
 |
 |
Date :
2019-05-04 19:49:51 |
By :
หน้าฮี |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
|
|