الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

إرسال SMS عبر AT-Commands

بدأه white soul في 7 أغسطس 2007 · 13 رد · 10,630 مشاهدة · في برمجة الأجهزة الكفية والمحمولة بالدوت نيت
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

salam

لبعث رسالة sms عن طريق ال hyperterminal مع جهاز GSM مو صول SERial

لو بدي اكتب الكود و انفذه ( simulation) من غبر وجود ال GSM Device

ممكن او لا ؟؟؟؟

وكيف ؟؟

سلاااااااام

Computer Engineer

2007

"اللهم يا مثبت القلوب ثبت قلبي على دينك "

ولدتك امك باكيا والناس حولك يضحكون سرورا

فافعل لنفسك ان تكون اذا بكوا في يوم موتك ضاحكا مسرورا

#2

السلام عليكم

راجع الموضوع

ممكن كود الsms

#3

بس انا ما بدي الكود "مو هون مشكلتي"

انا سمعت انه لما افتح ال hyper terminal بقدر اطبق نفس ال command على Fax modem

زي simulation ???

اشي هيك ؟؟

لو حد عنده فكرة

Computer Engineer

2007

"اللهم يا مثبت القلوب ثبت قلبي على دينك "

ولدتك امك باكيا والناس حولك يضحكون سرورا

فافعل لنفسك ان تكون اذا بكوا في يوم موتك ضاحكا مسرورا

#4
اقتباس
بس انا ما بدي الكود "مو هون مشكلتي"

انا سمعت انه لما افتح ال hyper terminal بقدر اطبق نفس ال command على Fax modem

زي simulation ???

اشي هيك ؟؟

لو حد عنده فكرة

عفوا لم أفهم ماذا تعني؟

هل تتحدث عنAT-commands أم ماذا؟

#5

انا بدي استخدم ال GSM وطبعا لازم اجيب جهاز GSM مشان اشبكه مع ال PC

بوصلة Serial

ببساطة ممكن عن طريق ال hyperterminal اني اكتب ال AT commands ويتم بعث المسج

بس انا ما بدي استخدم ال Hyper terminal

رح ابرمج بلغة السي دوت نت .. فلنفرض انه الكود كتبته .. هل ممكن اطبقة بس من دون ما يكون جهاز ال GSM ( يعني بس مشان اتاكد منه صح او لا) يعني اشي زي simulation للكود

Computer Engineer

2007

"اللهم يا مثبت القلوب ثبت قلبي على دينك "

ولدتك امك باكيا والناس حولك يضحكون سرورا

فافعل لنفسك ان تكون اذا بكوا في يوم موتك ضاحكا مسرورا

#6

خلينا ننسى اللي فوق

هلأ لو بدي اشبك موبايل مع ال PC

و عن طريق ال at command

ابعث مسج ؟؟ ممكن

طب في اشي software لازم يكون نازل ??

:s

لاني جربت و طلعلي error

تم تعديل هذه المشاركة بواسطة white soul في 15 أغسطس 2007 في 15:51

Computer Engineer

2007

"اللهم يا مثبت القلوب ثبت قلبي على دينك "

ولدتك امك باكيا والناس حولك يضحكون سرورا

فافعل لنفسك ان تكون اذا بكوا في يوم موتك ضاحكا مسرورا

#7

السلام عليكم

هذه مجموعة ال AT-Commands التي يمكن إستعمالها للتصرف في الرسائل القصيرة

اقتباس
AT commands originating from GSM 07.05 for SMS.... 102

AT+CMGC Send an SMS command .... 102

AT+CMGD Delete SMS message.... 103

AT+CMGF Select SMS message format .... 103

AT+CMGL List SMS messages from preferred store .... 104

AT+CMGR Read SMS message .... 107

AT+CMGS Send SMS message.... 110

AT+CMGW Write SMS message to memory.... 112

AT+CMSS Send SMS message from storage.... 114

AT+CNMA New SMS message acknowledge to ME/TE, only phase 2+ ....115

AT+CNMI New SMS message indications.... 116

AT+CPMS Preferred SMS message storage.... 118

AT+CSCA SMS service centre address .... 119

AT+CSCB Select cell broadcast messages.... 120

AT+CSDH Show SMS text mode parameters .... 121

AT+CSMP Set SMS text mode parameters.... 122

AT+CSMS Select Message Service.... 123

يمكن أيضا الإطلاع على هذا الموضوع

Siemens_GSM_Modem_AT.rar

#8
Ben_Laiid كتب:
السلام عليكم

هذه مجموعة ال AT-Commands التي يمكن إستعمالها للتصرف في الرسائل القصيرة

يمكن أيضا الإطلاع على هذا الموضوع

السلام عليكم

طبقت أوامر قراءة الرسائل من الموبايل و لم نتجح علماً بأن جهازي هو نوكيا 6630

و بالبحث وجدت كثير من الاشخاص يواجهون نفس المشكلة .

السؤال : ما هو الجهاز المتوفر الآن بالأسواق الذي يدعم AT-Command بحيث نستطيع من خلال Hyper terminal أن نقرأ الرسائل في صندوق الوارد .

وشكراً لك

أخي سوف تبكي عليك العيون * * * وتـسـأل عـنك دمـوع المـئـين

فإن جف دمعي سيبكي الغمام * * * يـرصـع قـبرك بــالـياسـمـيـن

أخـي مـا يـأسـنـا ولـن نيـأسـا * * * وما طال في القلب لبث الأسى

ومـا حـل أفــئــدة الــمــــؤمـن * * * سـوى أمـل في الـجنـان رسـى

أخي فانتظر ولتعش في غـد * * * سـيـنـبـثـق الأمـل الـسـرمـد

فـإن مـزقـتـنـا سني الــحـيـاة * * * فإنـا مع الـنصـر فـي مـوعــد

#9
اقتباس
طبقت أوامر قراءة الرسائل من الموبايل و لم نتجح علماً بأن جهازي هو نوكيا 6630
اقتباس
هذا القسم مختص بتقنية Microsoft .Net Compact Framework و للمساعدة على كتابة تطبيقات الأجهزة الكفية و المحمولة مثل الـ Pocket PC و الـ Smart Phones، و أيضاً لمناقشة تطبيقات الـ Smart Client Applications التي تتجه بقوة نحو الانتشار و الدعم من قبل Microsoft و الشركات الأخ
ر

السلام عليكم ورحمة الله و بركاته

ربما هذا سيفيدك

كيف أعرف مكاني في شبكة الهاتف الجوال

#10

شكرا على ردك

أعلم أن هذا مختص في الـ .net

ولكني وجدتكم تتحدثون عن AT-Command لذلك طرحت السؤال .

أخي سوف تبكي عليك العيون * * * وتـسـأل عـنك دمـوع المـئـين

فإن جف دمعي سيبكي الغمام * * * يـرصـع قـبرك بــالـياسـمـيـن

أخـي مـا يـأسـنـا ولـن نيـأسـا * * * وما طال في القلب لبث الأسى

ومـا حـل أفــئــدة الــمــــؤمـن * * * سـوى أمـل في الـجنـان رسـى

أخي فانتظر ولتعش في غـد * * * سـيـنـبـثـق الأمـل الـسـرمـد

فـإن مـزقـتـنـا سني الــحـيـاة * * * فإنـا مع الـنصـر فـي مـوعــد

#11

جوال 6220 يدعم انا جربته AT command على ما أظن اسمه الهمر

#12

السلام عليكم لو سمحت انا مشروع التخرج بتاعي بستعمل فيه gsm module

وانا عاوزه اعرف ازاي ابرمجه وازاي ابرمج الat commands

البرمجه بتبقي موجوده علي الموديول نفسه ولا انا بحطها مع برمجه الميكرو كنترولر بس وهو الموديول بيفهمها لوحده من غير محطها عليه يا ريت حد يساعدني متشكره جداااا

#13

السلام عليكم لو سمحت انا مشروع التخرج بتاعي بستعمل فيه gsm module

وانا عاوزه اعرف ازاي ابرمجه وازاي ابرمج الat commands

البرمجه بتبقي موجوده علي الموديول نفسه ولا انا بحطها مع برمجه الميكرو كنترولر بس وهو الموديول بيفهمها لوحده من غير محطها عليه يا ريت حد يساعدني متشكره جداااا

#14

السلام عليكم

لم يتم الاستقبال باللغة العربية

اكتب بالعربي نص الرسالة وتصل الرسالة على الجوال المرسل إليه بالمؤشرات (العربي فقط)

هذا كود الارسال

procedure TForm1.Button1Click(Sender: TObject);
var
  PhoneNumber: string;
  CommPort: string;
  NumberWritten: cardinal;
begin
  PhoneNumber :=
                 'ATD '+Edit1.Text +';'+ #13 + #10;
  CommPort := cbModemPort.Text;
  hCommFile := CreateFile(PChar(CommPort),
    GENERIC_WRITE,
    0,
    nil,
    OPEN_EXISTING,
    FILE_ATTRIBUTE_NORMAL,
    0);
  if hCommFile = INVALID_HANDLE_VALUE then
  begin
    ShowMessage('Unable to open ' + CommPort);
    exit;
  end;

  NumberWritten := 0;
  if WriteFile(hCommFile,
    PChar(PhoneNumber)^,
    Length(PhoneNumber),
    NumberWritten,
    nil) = false then
  begin
    ShowMessage('Unable to write to ' + CommPort);
  end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  CloseHandle(hCommFile);
end;

procedure TForm1.Button3Click(Sender: TObject);
var
  PhoneNumber: widestring;
  CommPort: string;
  NumberWritten: cardinal;
begin
  PhoneNumber := 'AT+CMGF=1'+SlINEbREAK;
  CommPort := cbModemPort.Text;
  hCommFile := CreateFile(PChar(CommPort),
    GENERIC_WRITE,
    0,
    nil,
    OPEN_EXISTING,
    FILE_ATTRIBUTE_NORMAL,
    0);
  if hCommFile = INVALID_HANDLE_VALUE then
  begin
    ShowMessage('Unable to open ' + CommPort);
    exit;
  end;

  NumberWritten := 0;
  if WriteFile(hCommFile,
    PChar(PhoneNumber)^,
    Length(PhoneNumber),
    NumberWritten,
    nil) = false then
  begin
    ShowMessage('Unable to write to ' + CommPort);
  end;
  PhoneNumber := 'AT+CMGS="'+Edit1.Text +'"'+ sLineBreak;
  NumberWritten := 0;
  if WriteFile(hCommFile,
    PChar(PhoneNumber)^,
    Length(PhoneNumber),
    NumberWritten,
    nil) = false then
  begin
    ShowMessage('Unable to write to ' + CommPort);
  end;
  PhoneNumber := Edit2.Text+#26+sLineBreak;
  NumberWritten := 0;
  if WriteFile(hCommFile,
    PChar(PhoneNumber)^,
    Length(PhoneNumber),
    NumberWritten,
    nil) = false then
  begin
    ShowMessage('Unable to write to ' + CommPort);
  end;
end;

تم تعديل هذه المشاركة بواسطة FOX_DELPHI في 29 يوليو 2010 في 20:06

مواضيع مشابهة