29-07-17, 03:02 PM
السلام عليكم و رحمة الله و بركاته
انا لا ادري ما الذي تقوم به الدالة Send و لكن من خلال الكود الخاص بك يبدو لي انها تاخذ وسيط من النوع String
هذا يدل على استخدامنا السليم لها.
بالنسبة للتعديل الذي طلبته على النص
و لو قدمت في سطور بسيطة لما تستخدم هذه المكتبة مع رابط لها , اذا لم يكن لديك مانع , قد تجد من يبحث او يحتاج لمثلها في عمله.
بالتوفيق
انا لا ادري ما الذي تقوم به الدالة Send و لكن من خلال الكود الخاص بك يبدو لي انها تاخذ وسيط من النوع String
هذا يدل على استخدامنا السليم لها.
بالنسبة للتعديل الذي طلبته على النص
PHP كود :
Dim Str As String = String.Concat(New String() {"<message xmlns='jabber:client' to='", Mystruct.room _
, "@conference.nimbuzz.com/", ListBox1.Items(i).ToString, vbNewLine,
"'type='chat' id='292'>", vbNewLine,
"<body>", vbNewLine, Mystruct.mspv1 & vbNewLine &
Mystruct.mspv2 & vbNewLine & Mystruct.mspv3 & vbNewLine &
Mystruct.mspv4 & vbNewLine & Mystruct.mspv5, vbNewLine &
"</body>", vbNewLine, "<html xmlns='http://jabber.org/protocol/xhtml-im'>", vbNewLine,
"<body xmlns='http://www.w3.org/1999/xhtml'>", vbNewLine,
"<p>", vbNewLine, "<em>", vbNewLine, "false", vbNewLine,
"</em>", vbNewLine, "<strong>", vbNewLine, "true", vbNewLine,
"</strong>", vbNewLine, "<span style='" & Mystruct.colors & "'/>", vbNewLine,
"</p>", vbNewLine, "</body>", vbNewLine, "</html>", vbNewLine,
"</message>", vbNewLine, "***********************************"})
و لو قدمت في سطور بسيطة لما تستخدم هذه المكتبة مع رابط لها , اذا لم يكن لديك مانع , قد تجد من يبحث او يحتاج لمثلها في عمله.
بالتوفيق
اللهم لك الحمد كما ينبغي لجلال وجهك و عظيم سلطانك
في حل و ترحال


