اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

أخواني الأفاضل

عندي سؤال مهم بالنسبة لي

هل يستطيع أحدكم أحبائي تحويل الكود التالي الى كود الأكسس 

Imports System.Net

Imports System.IO

Public Class Form1

Private Sub

Send_SMS(ByVal sender As Object, ByVal phonenumber As Object, ByVal msg As Object, ByVal dc As Object)

Dim client As WebClient = New WebClient

Dim username = "USERNAME"

Dim password = "GENERATED_PASSWORD"

Dim baseurl As String = "https://put here website =" + phonenumber + "&sender=" + sender + "&sms=" + msg + "&binary=" + dc + "&username=" + username + "&password=" + password

Dim data As Stream = client.OpenRead(baseurl)

Dim reader As StreamReader = New StreamReader(data)

Dim s As String = reader.ReadToEnd()

'MsgBox(s)

data.Close()

reader.Close()

End Sub

End Class

 

أتمنى من كل قلبي أن أجد الحل

وكلي ثقة بأنه من يعرف الحل أن لا يتردد في مساعدتي

وله وكل من يساعد دعوة مني بأن يوفقه الله وأن يرحم والديه

  • أفضل إجابة
قام بنشر

حياك الله اخي الكريم ...

بحسب فهمي للكود أعلاه بأنك ترغب في ارسال رسائل من برنامجك الأكسس ..  الكود vb.net

الموضوع نوقش في المنتدى الأسبوع الماضي وهذا رابط اتمنى يفيدك...

http://www.officena.net/ib/topic/63036-نظام-إجازات-الكتروني/

واذا فهمتك خطاء اتمنى ان تعذرني ..

  • Like 1
قام بنشر (معدل)

جزاك الله كل الخير أخي الفاضل

مشكلتي الآن انحصرت فقط في عدم استطاعتي ارسال الرسالة باللغة العربية

عند ارسالها تكون الحروف مبهمة

الذي عملته أنا فقط استبدال الموقع الذي ارسل منه الرسائل مع موقع بتلكو

والموقع الذي أرسل منه هو التالي

https://www.bahrainsms.net/api/?username=&password=&sms=HelloWorld&mobile=&binary=0

 

مع العلم أنه في موقعهم مكتوب أنك  اذا وضعت

binary = 0

للغة الانجليزية

binary=1

للغة العربية

قمت بتجربة ذلك فلم تنجح الطريقة

جزاك الله أخي (  آخر الأرض ) خير الجزاء ورحم الله والديك في الدنيا والآخرة

تم تعديل بواسطه Jafar121

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information