• الإعلانات

    • فيصل الحربي

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

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

Misiny_forever

اعضاء
  • عدد المشاركات

    178
  • تاريخ الانضمام

  • تاريخ اخر زياره

السمعه بالموقع

0 عادي

عن Misiny_forever

  • الرتبة
    عضو

طرق الإتصال

  1. أخوانى الأعزاء هذه هى اجابت سؤالى وهى استدعاء امساء جميع قواعد البيانات اللى قمت بعمل odbc لها من خالا ال sql SERVER Dim db As New ADODB.Connection Dim cmd As New ADODB.Command Dim rs As New ADODB.Recordset db.CursorLocation = adUseClient db.Open "DSN=master;UID=sa;Password=8888" cmd.CommandType = adCmdText cmd.CommandText = "Select * from dbo.sysdatabases" Set cmd.ActiveConnection = db rs.Open cmd, , adOpenKeyset, adLockOptimistic Form1.Caption = "No. of DB = " & rs.RecordCount For i = 1 To rs.RecordCount Combo1.AddItem rs.Fields("name") rs.MoveNext Next i rs.Close db.Close
  2. Arabic TTS Engine

    أخى pharaonic اتمنى ان تقوم برفع البرنامج الذى قلت عنه حتى نستطيع من الاطلاع عليه ونقدر على تطويره
  3. Arabic TTS Engine

    شكرا للأخوه جميعا اهتمامهم بالموضوع .بالفعل موضوع محرك TTS ناطق باللغه العربية خو موضوع صعب وذلك نظرا لوجود اكثر من طريقة لنطق الحرف وشركة صخر للبرمجيات هى الشركة العربية الوحيده التى قامت بتطوير هذا البرنامج ولكنه ايضا ليش جيدا فى النطق . ارجو من الاخوه الاعضاء اننا نقوم بعمل هذا المحرك سويا بصورة جيده بالتعاون مع بعضنا البعض . وشكرا للأخ Pharaonic على هذه المحركات وجاى تجربتها
  4. السلام عليكم ورحمة الله وبركاتة أخوانى الاعزاء هل لدى أحد الاعضاء برنامج يقوم بنطق الكلمات لكن باللغه العربية وليس باللغة الإنجليزية انا قمت بتصميم البرنامج باللغه الانجليزية وادرجته للأخوه الاعضاء ولكن انا اريد اى أداة تقوم بنطق الكلمات والحروف باللغه العربية اتمنى الرد سريعا من الاخوه الاعضاء
  5. الأخ العزيز يمكنك استدام كلا من البرامج setup factory او installshield ونظرا لقوتهم فى عمل حزم التثبيت وللعلم فأن حزم التثبيت الخاصة بالفيجوال بيزك ضعيفة
  6. السلام عليكم ورحمة الله وبركاتة إخوانى الاعزاء ياريت تشوفوا الكود ده وتقوليلى ايه الغلط فيه لانى لما بنفذ الكود من غير جملة where الكود بيشتغل ويختار كل السجلات لكن لما بعمل جملة where بيرجع كل السجلات برضه والمفروض انه يرجع بس عدد السجلات الموجوده بين التاريخين اللى انا مختار بيهم If Text1.Text = "" Or Combo1.Text = "" Then MsgBox ("Please select the service name and Insert the cost per minute to calculate"), vbInformation, "Statistic" Text1.SetFocus Else On Error GoTo ErrorPara Dim cn As New ADODB.Connection Dim rs1 As New ADODB.Recordset Dim cmd1 As New ADODB.Command cn.CursorLocation = adUseClient Dim s As String Dim d As String Label2.Caption = s cn.Open s cmd1.CommandType = adCmdText cmd1.CommandText = "Select sum(actual_durations) as cnt,count(ani) as cnt1 from trans where call_date between '" & DateValue(Text8.Text) & "' And '" & DateValue(Text9.Text) & "'" Set cmd1.ActiveConnection = cn rs1.Open cmd1, , adOpenKeyset, adLockOptimistic Text2.Text = (rs1!cnt / 60) * Trim(Text1.Text) & " K.D" Text3.Text = rs1!cnt1 Text4.Text = rs1!cnt / 60 Text5.Text = rs1!cnt rs1.MoveNext rs1.Close cn.Close ErrorPara: OpenConnections = False UpdateLog "Error Opening Connections -- " & Now() & ", " & _ Err.Number & ", " & Err.Description End If
  7. السلام عليكم ورحمة الله وبرماتة أخوانى الاعزاء , انا شغال على الاس كيو ال سيرفر وعندى مثلا 20 قاعدة بيانات داخله ازاى اقدر استدعى اسماء قواعد البيانات اللى موجوده داخل الاس كيو ال سيرفر كلها فى combo box مع العلم انى عامل لكل قواعد البيانات اللى عندى ODBC Connection .
  8. أخى العزيز meynot شكرا لتوضيحك للمعنى . بس انا ذكرت اسم الاخ الظفيرى لانه طلب طريقة عمل تدرج على الفورم واتقفل الموضوع الخاص بيه فعشان كده حددت الاسم عشان يقدر يعرف ان ده رد على موضوعه . وانا محطتش الموضوع لشخص بعينه ممكن اى حد ينزل المرفقات ويتعلم منها ولكنى بس وضحت اسم الظفيرى عشان يعرف ان الموضوع ده رد على طلبه .
  9. إلى الاخ العزيز المظفر السليمى دى طريقة عمل تدرج على الفورم ويمكنك من خلالها التحكم فى الالوان gradient.rar
  10. أخى العزيز يمكنك استخدام جملة sql لتنفيذ الاستعلام الذى تريده فمثلا للإستعلام عن اليوم يمكنك عمل تكيست بوكس ولتكن text1 ثم عمل زر ليقوم بتنفيذ عملية البحث والاستعلام SQL = "select * from Tperson where fdate = " & Text1.Text & " " Set z1 = d.OpenRecordset(SQL, dbOpenDynaset) وتقوم بعد ذلك بإستراجع البيانات داخل الحقول التى قمت بتحدديها هذه الطريقه استخدمتها فى الاستعلام بإستخدام تقنيه ال DAO لكنك يمكنك إستخدامها مع ADO ايضا
  11. أخى العزيز نورتون ممكن توضح اى طريقة نسخ ومن اى نوع من الملفات تود النسج الى السكيول سيرفر هل تريد النسخ من قاعدة بيانات اكسيس او من ملف اكسيل او من بارادوكس او من اوراكل حتى تتم عملية النسخ. وهذه الطريقة هى لكل انواع الملفات السابقة قم بفتح السكيول سيرفر ثم قم بإنشاء قاعدة بيانات على الاسكيول سيفر بنفس اسم قاعدة البيانات القديمة او بأى اسم تريده ثم قم بالضغط كليك يمين على قاعدة البيانات الجديدة واختار All task ثم Import data ثم اضغط next ومن data source اختار نوع ملف المصدر المراد النسخ منه ثم اختر الملف نفسه فأن كان النسخ من ملف اكسيس اختار microsoft access ثم فى خانه file name اختر قاعدة البيانات المراد نسخ البيانات منها. ثم اكمل العملية لأخر خطوه وسوف تنسخ الملفات اوتوماتيكايا الى قاعدة بيانات على الاسكيول
  12. dynamic report

    السلام عليكم ورحمة الله وبركاتة أخوانى الاعزاء لى سؤال ويارب تكون عون لى وفى إجابته انا بعمل تقرير دلوقتى والتقرير ده عباره عن فاتوره فى بدايه التقرير من فوق فى الصفحه بيكون التاريخ واسم العميل ورقم الفاتوره وكده انا عايز فى المربع اللى بنكتب فيه الاصناف ان لو العميل طلب صنف واحد يعنى مثلا ريكورت ست واحد يبقى التقرير هيتطبع بقيمه واحده بس والخطوط كلها اوتوماتيك هتبقى مرسموه حولين ريكورد واحد وهكذا لو طلب العميل 3 اصناف مثلا يبقى عندى 3 ريكورد ست والخطوط تترسم حولين 3 ريكورد ست بس ولو اكثر هيحصل التغير على حسب الاصناف اللى دخلت يارب اكون وضحت ليكوا طلبى واتمنى منكوا المساعده فى اقرب فرصه
  13. السلام عليكم ورحمة الله وبركاتة أخوانى الأعزاء ده كود ممكن يقلل الوقت بتاع كود ال clear لما يكون عندى عدد كبير من التكست بوكس على نفس الفورم وعاوز اعملهم clear كلهم فى نفس الوقت ده كود بيعمل الامر ده فى 3 سطور برمجية فقط أخوكوا / محمد المسينى Clear.rar
  14. تحياتى لكم جميعا على ردكم الجميل والى الأمام دائما بإذن الله
  15. السلام عليكم ورحمة الله وبركاتة أخوانى الأعزاء الملف المرفق يحتوى تقريبا 5 برامج مفيده لدرجة ما تتخيلوها يارب الكل يستفيد منها وللعلم هذه البرامج منقوله من موقع رأيته وانا اتصفح الانترنت بس صدقونى البرامج دى مفيده جدا جدا اجدا . أخوكوا / محمد المسينى very good examples.rar