• الإعلانات

    • فيصل الحربي

      تسجيل عضوية جديدة في المنتدى   01/31/2016

      السلام عليكم ورحمة الله وبركاته  عزيزي العضو الجديد :  حاليا رسالة الإيميل لتأكيد صحة إيميلكم تذهب للبريد العشوائي ( جاري حل المشكلة )  فإذا لم تجد رسالة التحقق من إيميلكم في صندوق الوارد لديكم إتجه للبريد العشوائي ( JUNK)  وقم بتفعيل إشتراككم من هناك   

البحث في المنتدى

Showing results for tags 'Using ADODataset command text'.

  • البحث بالتاقات

    اكتب الكلمات المفتاحيه بينها علامه الفاصله
  • البحث بكاتب الموضوع

تم إيجاد 14 نتيجة

  1. يا جماعة انا عندي مشكلة وهي انه انا عندي نموذج رئيسي وبسجل فيه حركات علي السيارات يعني مثلا حركة ربط سيارة او فكها من صندوق المهم انا عملت انه في النموذج بتاع التسجيل لحركة سيارة جديدة انه عند اختيار كود السيارة من الكومبو بوكس بيتم عمل استعلام في نموذج فرعي بحيث يجري بحث في جدول الحركات عن تاريخ اخر عملية ربط لهذه السيارة واخر عملية فك بحيث لو كان تاريخ الربط اكبر من الفك يبقي السيارة دي مربوطة في صندوق ولو تاريخ الفك اكبر يبقي السيارة حاليا ممكن ربطها بصندوق المشكلة بتحصل انه بعض السيارات بيكون حدث لها عملية واحدة اما ربط او فك بالتالي في الاستعلام الخاص بها يكون سجلات ناتج احد العمليتين فارغ من السجلات ويكون مربع النص اللي فيه نتيجة اخر تاريخ لهذه العملية بيظهر فيه #Error  فهل هناط طريق بحيث انه في حالة عدم وجودة سجلات في النموذج الفرعي بتاع الاستعلام تكون نتيجة مربع النص مثلا صفر ( المفروض ان النتيجة تاريخ ) بحيث يسهل مقارنتها مع مربع النص الاخر ؟؟؟ 
  2. السلام عليكم ورحمة الله وبركاته الرجاء مساعدتى فى كتابة كود يمكننى من الانتقال الى textbox2 بعد ادخال رقم فى text box1 تلقائيا وهكذا أى بمعنى أدق عندى حوال 20 حقل textbox وكلها أريد أن أدخل فيها رقم (واحد) لكل خانة واريد أن يعمل (tab) تلقائي بعد ادخال الرقم فى الخانة الأولى  مثال: بعد أن أدخل فى الخاننة الأوى رقم 5 ينتقل تلقائيا بعد الكتابة إلى الخانة التالية وهكذا وشكرا جزيلا لكم
  3. هل يوجد طريقة برمجية تسمح بتحويل النص المكتوب بالعربي الى صوت بحثت كثيرا فوجدت engine جاهزة مثل برنامج شركة صخر لكن السؤال ما هى الخطوات التى اتبعتها شركة صخر لبرمجة محول النصوص لصوت ما هى الفكرة التى تستخدمها هذة البرامج لكى ابدأ فى عمل engine الخاص بى  و خلال بحثى وجدت برنامج جاهز هو acapela tts اضغط هنا لتحميل النسخة بعد اعداد البرنامج ستجد فى الامثلة تطبيق جاهز بلغة C# و اخر Vb.net قمت برفقة و بحثت ايضا فوجدت موصضوع مشابهة فى منتدى اخر و هو http://parmoog.com/showthread.php?t=1620   لكن قمت بتجربة الفكرة فكانت النتيجة ان الحروف تنطق غير متصلة كما لو كان برنامج لتعليم التهجئة للكلمات و ليس نطق الكلمات برجاء ارشادى للفكرة التى استخدمتها شركة صخر فى عمل arabic TTs وشكرا Backup.rar
  4. السلام عليكم ورحمة الله   اريد استخدام امر سيكوال للبحث في قاعدة بيانات اكسس باستخدام الـLike بمكون الـADODataset  لا يمكنني استخدامه بنفس الطريقة في السيكوال سيرفر بالاضافة الة تحديد تاريخ اليوم من البيانات الموجودة     سلمكم الله
  5. ياريت يا جماعه حد يساعدنى عندى فورمه فيها زرار حفظ وزرار طباعه عايز لو فى مثلا textbox1 فاضى واجى ادوس حفظ يطلعلى مسج بوكس يقولى املاء البيانات اولا واكون شاكر افضالكو
  6. كيف لي ان اجعل text box لا يستوعب اكثر او اقل من14 رقم 
  7. ألسلام عليكم ورحمة الله وبركاتة   بعد ان تعلمت اساسيات C\C++ أردت ان انطلق في أول مشاريعي لكني إعتدت ان اعمل برامج الـ Console .. لذلك أردت ان انطلق مع البرامج ذات الـ GUI   من هنا أتتني العديد والعديد من الإستفهات التي تدور برأسي وأعتقد أن أغلب المبتدئين أمثلي لديهم هذه الإستفهامات   في البداية أريد بئية تطوير مجانية سواً كانت IDE او مجموعة ادوات تطوير تعمل عمل الـ IDE في السابق كنت استعمل RAD Studio XE4 حيث انها تدعم لغة C++ ... وأستطيع عمل برامج ذاتواجهه رسويمة أو Console لكن بيئة التطوير غير مجانية وكذلك غير ثابتة(يوجد بعض الاخطا)   لدي سؤال .... هل البرمجة من خلال IDE افضل أم مجموعة أدوات تطوير تعمل عمل الـ IDE  ؟   كمثال IDEs :   واخيراً أريد منكم نصيحها في هذه الموضوع   طرحت هذا السؤال لاكون على دراية تامه بالموضوع   -------   الخلاصة   أريد بئية تطوير مجانية هل البرمجة من خلال IDE افضل أم مجموعة أدوات تطوير تعمل عمل الـ IDE  ؟ أريد منكم نصيحها في هذه الموضوع     أرجو اني لم اخالف قوانين القسم ^^"
  8. بكل طرق التشفير يبقى هناك نص للبيانات عندما تعترض من قبل العدو يشكك في كونها رسالة مشفرة ويحاول ان يفكها بكل طرق التشفير فمثلا طرق تشفير التي نعرفها مشهورة حاليا يعرفها الجميع ومثلما نستطيع ان نشفر نص بها  يستطيع العدو ان يحاول فك النص بها .حتى طرق تشفير جديدة التي نحن نبنيها لا يعرفها غيرنا يبقى العدو يحاول فكها. الذي نريده نحن ان معترض الرسالة (العدو) لا يشك اصلا بوجود رسالة مشفرة لأننا سنخفيها داخل صورة فلا يفكر اصلا بوجود نص مشفر او نخفيها بصورة بين 100 صورة مرسلة فيصعب على المعترض إيجادها ومن ثم فكها. هناك طرق عديدة لإخفاء نص داخل صورة معينة وأفضلها وضع النص في LSB لكل Gray Scale حيث يمثل هذا البت رقم واحد فقط مثلا اذا كان في Gray Scale معين رقم زوجي يكون LSB صفر واذا فردي يكون واحد أي إننا اذا غيرنا هذا البت بواسطة اخفاء بيانات في داخله  أي تغير في قيمته لا يؤثر على الصورة كثيرا فهو يغير الأضائه بمقدار واحد فقط من اصل 255 أي لا يسبب بأثر واضح يجعل الشخص يشك بوجود نص مشفر داخل الصورة أي مثلا لو كان Gray Scale لموقع معين (161) لو خزنا  في LSB له قيمة (0 ) يصبح  Gray Scaleلهذا الموقع يساوي 160 ولو خزنا فيه (1) يبقى (161 )   خطوات الإخفاء على صورة عادية gray 1.    نقرئ الصورة  الملونة وثم نحولها الى عادية وبعدها نجد ابعاد المصفوفة وتساعدنا ابعاد المصفوفة على اعادة الصورة الى شكلها الاصلي بعد خزن النص في داخلها   Matlab Code 2d gray imagex=imread('C:\Users\Public\Pictures\Sample Pictures\Penguins.jpg');imageDCE=rgb2gray(x); [r c]=size( imageDCE);        2.    نحول الصورة الى النظام الثنائي(Binary)  حتى نستطيع ان نغير البت الثامن الايمن LSB     Matlab Code 2d gray imageimageBIN=dec2bin( imageDCE);       3.    ندخل النص المرد إخفائه ونحوله الى AScii Code ومنه الى النظام الثنائي ونجد عدد الصفوف وعدد الأعمدة له حتى نستطيع ان ننقل بايتات كل حرف الى داخل البتLSB في الصورة حيث كل بايت من بايتات الحرف سيخزن في البنت الثامن الأيسر لموقع معين في الصورة     Matlab Code 2d gray imagetext='hi';ascm=double(text);binasc=dec2bin(ascm);[rt, ct]=size(binasc);    4.    ألان نخزن كل بت من البتات السبعة من  كل حرف داخل صف من صفوف الصورة في العمود الثامن الذي يمثل LSB ثم ننتقل للبت المقابل في الكلمة الثانية ونستمر حتى اخر حرف ثم نرجع لثاني بت بأول كلمة ثم ثاني بت بثاني كلمة ونستمر. أي كلما ازداد حجم النص ازدادت صعوبة فك شفرة شاهد الصورة  لا يعرف المعترض ماهي بنات الصورة وما هي بتات النص   Matlab Code 2d gray imagefor i=1:1:rt*ct imageBIN(i,8) =binasc(i);   end    بواسطة i نحدد من أي موقع داخل الصورة نبدأ بعملية الإخفاء   5.    ألان أخفينا النص داخل الصورة ألان نحول الصورة من النظام الثنائي الى النظام العشري ونعيد ابعاد المصفوفة الى أبعادها الاولية باستخدام داخلة reshape  ونشاهد ان الصورة تحولت بصيغية رقم واحد نستخدم دالة   uint8 لنعيدها الى صيغة رقم عشري بثمانية بت   Matlab Code 2d gray imageENCimageDCE=uint8(reshape(bin2dec(imageBIN),r,c ));  6.    نقوم برسم الصورة قبل وبعد خزن النص في داخلها       Matlab Code 2d gray imagesubplot(1,2,1) imshow(imageDCE) subplot(1,2,2) imshow(ENCimageDCE)      اعادة النص المشفر من الصورة 1.    نحول الصورة الى صيغة النظام الثنائي   Matlab Code 2d gray image  decriptext=dec2bin(ENCimageDCE);  2.    ناخذ البت الثامن من كل صف ونخزنه في مصفوفة جديدة ونلاحظ انه يجب ان يرسل لنا صاحب الرسالة المشفرة عدد صفوف وعدد اعمدة النص المشفر ومن اين يبدأ التشفير داخل الصورة حتى نستطيع أخراجه   Matlab Code 2d gray image textbin=decriptext(1:rt*ct,8);  3.    نعيد تحجيم المصفوفة النص الى شكلها الأولي بصيغة النظام الثنائي ونحولها من النظام الثنائي الى النظام العشري   Matlab Code 2d gray imageascimessage=bin2dec(reshape(textbin ,rt,ct ) );  4.    نحول البيانات من العشري الى الحروف ونضع علامة (‘) لكي تعرض بشكل صفوف       Matlab Code 2d gray image messageDEc= char(ascimessage)'         كود برنامج الإخفاء وإعادة النصوص كامل لصورة عادية   Matlab Code 2d gray imageclc clearx=imread('C:\Users\Public\Pictures\Sample Pictures\Penguins.jpg');text='bad friend maked you bad';ascm=double(text);binasc=dec2bin(ascm);[rt, ct]=size(binasc);%we use 2D image tospeed op. imageDCE=rgb2gray(x); %we use one line to relase line of code %imageDCE=imageDCE(1:4,1:4); %saved old shap it convert to one line [r c]=size( imageDCE); % convert image to binaryimageBIN=dec2bin( imageDCE); % cover it to one col 8bit and  row=r*c% imageBIN(:,8)=0; % put zero in all LSB in image for i=1:1:rt*ct imageBIN(i,8) =binasc(i);   end %imageBIN(:,8)=binasc(1:end) % UINT8 Convert to unsigned 8-bit integer. becuse it convert to one bit ENCimageDCE=uint8(reshape(bin2dec(imageBIN),r,c ));% ENCimageDCE(1:rt*ct)=0; to show area of hide subplot(1,2,1) imshow(imageDCE) subplot(1,2,2) imshow(ENCimageDCE)% figure %imageBIN(1:rt*ct,:)=0; % ENCimageDCE=uint8(reshape(bin2dec(imageBIN),r,c )); %imshow(ENCimageDCE) % to sure of encrption binasc(1:8),imageBIN(1:8,8) show that who image is % encripted decriptext=dec2bin(ENCimageDCE); textbin=decriptext(1:rt*ct,8); ascimessage=bin2dec(reshape(textbin ,rt,ct ) ); messageDEc= char(ascimessage)'   كود برنامج الإخفاء وإعادة النصوص كامل لصورة  ملونة     Matlab Code 3d rgbclc clearx=imread('C:\Users\Public\Pictures\Sample Pictures\Penguins.jpg');text='hi';ascm=double(text);binasc=dec2bin(ascm);[rt, ct]=size(binasc);%we use 2D image tospeed op. %imageDCE=rgb2gray(x); %we use one line to relase line of code// show who image effect by text% imageDCE=imageDCE(1:4,1:4); %saved old shap it convert to one line %[r c]=size( imageDCE);  %if we use 3D image--------------   [r c f]=size( x);   imageBIN=dec2bin( x);   %------------------------ % convert image to binary%imageBIN=dec2bin( imageDCE); % cover it to one col 8bit and  row=r*c% imageBIN(:,8)=0; % put zero in all LSB in image for i=1:1:rt*ct imageBIN(i,8) =binasc(i);   end %imageBIN(:,8)=binasc(1:end) % UINT8 Convert to unsigned 8-bit integer. becuse it convert to one bit ENCimageDCE=uint8(reshape(bin2dec(imageBIN),r,c,f )); subplot(1,2,1) imshow(x) subplot(1,2,2) imshow(ENCimageDCE)% figure %imageBIN(1:rt*ct,:)=0; % ENCimageDCE=uint8(reshape(bin2dec(imageBIN),r,c )); %imshow(ENCimageDCE) % to sure of encrption binasc(1:8),imageBIN(1:8,8) show that who image is % encripted decriptext=dec2bin(ENCimageDCE); textbin=decriptext(1:rt*ct,8); ascimessage=bin2dec(reshape(textbin ,rt,ct ) ); messageDEc= char(ascimessage)'     تحميل المقالة من هنا    http://hussienahmmed.blogspot.com/2013/03/hide-text-in-image-by-matlab.html    
  9. هذا الكود يقوم بتنفيذ Command Line من Visual Basic 2010 التصميم   خصائص : Form Name : form1 Caption : Compare two exe files TextBox 'Contains the command Line FC Name : TextBox1 MultiLine : True Text : @Echo Off FC C:\comp\CS.exe C:\comp\Cexe.exe /B TextBox 'Will contain the Comparison result of the two EXE application files. Name : TextBox2 MultiLine : True Text :Comparison Result will display here ... Button 'Executes the Command Line FC in the TextBox1 Name : Button1 Text : Go   الكود : ' --------------------------------------- '' Visual Basic Online Course ------------ '' By / evry1.net ------------------------ '' on Jan, 2014 -------------------------- '' Facebook : fb.com/Visual.Basic.Language '' --------------------------------------- 'Public Class Form1Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.ClickDim cmdInput As String = TextBox1.Text.Trim & "&"Dim proc As New Processproc.StartInfo.CreateNoWindow = Trueproc.StartInfo.UseShellExecute = Falseproc.StartInfo.FileName = "C:\Windows\System32\cmd.exe"proc.StartInfo.Arguments = cmdInputproc.StartInfo.RedirectStandardOutput = Trueproc.StartInfo.RedirectStandardError = Trueproc.StartInfo.RedirectStandardInput = Trueproc.Start()proc.StandardInput.WriteLine(cmdInput)proc.StandardInput.Close()Dim line As String = NothingDim lines As Integer = 0While (proc.StandardOutput.EndOfStream = False)line = proc.StandardOutput.ReadLine()TextBox2.AppendText(line & vbNewLine)lines = lines + 1End Whileproc.Close()proc.Dispose()End SubEnd Classاذا كنت مهتما بالشرح
  10. تحية طيبة: أرجو المساعدة في توضيح الفروقات بين الأنواع الحقول  التالية ما مزايا وما عيوب كل منها: Text, nvarchar, varchar, nchar, char   وكيف انتقي النوع المناسب لما اريد؟ ولكم الشكر
  11. نظرا لأن كتابه الكود هنا غير ملائمه فقد وضعت الاكواد بملف مرفق الموضوع باختصار ، اريد اخفاء جميع الأزرار التي تحمل (command argument) معين عندما يكون المستخدم ليس له صلاحيه استخدامها ، وذلك بدلا من ان اتعامل مع زرار زرار وكنترول كنترول بعينه واكتب اكواد كتيره وربما انسى كنترولز مهم ان تكون مخفيه ---- وقد جربت محاولتين من الكود وهي موجوده بالملف المرفق ، ولكنها لم تأتي بفائده ، علما بأني مشروعي (Web Application) و شكرا للمساعده C#Codes.txt
  12. السلام عليكم اخوتي الاعزاء      ارجو مساعدتي في اضافة زر عند لضغط عليه يضيف للفورم الحالي new text box و يضيف بالجدول حقل جديد ومثالي مرفق ادناه      db1.rar
  13. إخوان ممكن طلب ولو كان خارج الموضوع تمام .. جداً .... هل لديكم أي معلومات أو أي مواقع أو أي رابط عـن كيفية صنع محرر نصوص .. الخوارزميات المستخدمـة .. أي شيء آخر عـن هذا الموضوع .. كيفية تلوين كلمات محجوزة باللون الأزرق أو الأحمر مثل محرر الفيجوال دوت نت الكارثـة ........ إذا كان لديكم مواقع فرجاءً يكون موقع للمتوسطين مو موقع صاحبه مشغول ولا قدر يشرح زين ....
  14. السلام عليكم ورحمة الله وبركاتة اليوم اريد ان اطلع 3 اكواد تختص بمعالجة النصوص اخذتها كواجب ... وبعد انتهاء فترة تسليم الواجبات احببت ان اضع الكود للجميع حتى يتم الاستفادة منه وتعديله اذا كانت فيه اخطاء الكود الاول : يقوم بطباعة عد تكرارا الاحرف في سطر واحد #include <iostream>using namespace std;const int size=400;int main(){ char line[size]; char string='a'; cin.getline(line,size,'\n'); for(int j=0;string<='z';j++,string++){  int counter=0;  for(int i=0;line[i]!='\0';i++)  if(string==line[i])    counter++;  if(counter!=0)    cout <<string<<" use "<<counter <<" Time"<<endl; } return 0;}الكود الثاني : يقوم بطباعة تكرار الكلمات المتساوية في عدد الاحرف في 3 اسطر. #include <iostream>#include<cstring>using namespace std;void funspace(char []);const int size1=1500,size2=500,size=100;int main(){ int length; int lengtharray[size]={0}; char line[size1],line2[size2],line3[size2]; char *tokenPtr; cin.getline(line,size2,'\n'); funspace(line); cin.getline(line2,size2,'\n'); funspace(line2); strcat(line,line2); cin.getline(line3,size2,'\n'); strcat(line,line3); tokenPtr=strtok(line," "); while ( tokenPtr != NULL ) {    length=strlen(tokenPtr);  lengtharray[length-1]++;      tokenPtr = strtok( NULL, " " );     }  for(int i=0;i<size;i++)   if(lengtharray[i]!=0)    cout<<lengtharray[i]<< " word(s) of length :"<<i+1<<endl; return 0;}void funspace(char array[]){ for(int i=0;array[i]<size2;i++)  if(array[i]=='\0'){  array[i]=' ';  array[i+1]='\0';  break;}}الكود الثالث : يقوم بكباعة على تكرار كل كلمة في قطعة تتكون من 5 اسطر ...( اجوا اختبارا الكود واعلامي بمدى فعاليته ) . #include <iostream>#include <iomanip>using namespace std;void funspace(char []);const int size=2000,size2=400;int main(){ char line[size]; char line2[size]; char line3[size2]={'\0'}; char line4[size2]={'\0'}; char line5[size2]={'\0'}; char *strings[size2] ,*tokenPtr; int i=0; cin.getline(line,size2,'\n'); funspace(line); cin.getline(line2,size2,'\n'); funspace(line2); strcat(line,line2); cin.getline(line3,size2,'\n'); funspace(line3); strcat(line,line3); cin.getline(line4,size2,'\n'); funspace(line4); strcat(line,line4); cin.getline(line5,size2,'\n'); strcat(line,line5); tokenPtr=strtok(line," "); strings[i]=tokenPtr; for (;tokenPtr != NULL;i++ ) {     strings[i]=tokenPtr;      tokenPtr = strtok( NULL, " " );   } for(int k=0;k<i;k++ ){  int counter=1;  if(*strings[k]==NULL)    continue;  else{    for(int r=(k+1);r<i;r++)    if(*strings[k]==*strings[r]){      counter++;      *strings[r]=NULL;    }    cout << std::setw(10)<<left<<*(strings+k)<<"use "<<counter<<" Time"<<endl;    } } return 0;}void funspace(char array[]){ for(int i=0;array[i]<size2;i++)  if(array[i]=='\0'){  array[i]=' ';  array[i+1]='\0';  break;}}