• الإعلانات

    • فيصل الحربي

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

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

alhadi_tchnosoft

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

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

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

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

0 عادي

عن alhadi_tchnosoft

  • الرتبة
    عضو جديد
  • تاريخ الميلاد 05/05/1983

طرق الإتصال

  • ICQ 0

معلومات الملف الشخصي

  • الجنس ذكر
  1. أنا آآآآآآآآآآآآآآآسف جداً أخواني لم ألاحظ الكود للاسف وهذا هو الكود :blush: :blush: :S :S :S :S :S :S :S :S :S :S   Dim DS As New DataSet   Dim DB As New OleDbDataAdapter   Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click   On Error Resume Next   DS.Clear()   Dim Str As String = "SELECT * FROM USERS WHERE UserName='" & TextBox1.Text & "' and UserPass='" & TextBox2.Text & "'"   DB = New OleDbDataAdapter(Str, CONN)   DB.Fill(DS, "USERS")   If DS.Tables("USERS").Rows.Count > 0 Then   DB.Dispose()   CONN.Dispose()   MessageBox.Show("مبرووووووك لقد تم تسجيل دخولك للبرنامج", " برنامج التحقق من اسم المستخدم ", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button2, MessageBoxOptions.RtlReading)   CONN.Dispose()   Else   MessageBox.Show("تأكد من إدخال كلمة السر أو اسم المستخدم بشكل صحيح", "برنامج التحقق من اسم المستخدم ", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button2, MessageBoxOptions.RtlReading)   Me.TextBox1.Focus()   End If[/left][left]Dim CONN As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\MyDataProject.mdb")
  2. بســم الله الـرحمــن الرحيــم السلام عليكــم ورحمـة الله وبركاتــة،، أهلاً ومرحباً .. أهلا بمن أتانا بتحية وسلام يريد الترحيب بأحلى الكلام .. يريد أن نعلن له الأنضمام .. إلى كوكبة أعضائنـا الكرام ،، أخواني الأعضاء الكرام حبيت أن أقدم لكم شرح بسيط عن كيفية التحقق من أسم المستخدم وكلمة المرور المخزنة في قاعدة البيانات وهذه صورة للنموذج الذي سنطبق عليه الشرح وسنتعامل مع قاعدة بيانات من نوع أكسس ونسمي هذه القاعدة بإسمMyDataProject وتحتوي على جدول باسم USERS والجدول يحتوي على الحقول التالية: UserName UserPass بعد أن نكون القاعدة والجدول  نقوم بإدخال  اسم المستخدم والباسوورد أدخل البيانات التي تريدها بعد ذلك قم بإنشاء مشروع جديد في برنامج Visual.Net 2005 وصمم النموذج كما هو موضح في الصورة أعلاه  ونكتب الكود التالي فوق منطقة Public Class Imports System.Data Imports System.Data.OleDb وهذا لأننا سنتعامل مع قاعدة بيانات من نوع أكسس وفي زر الأمر دخــول نكتب الكود التالي: Dim CONN As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\MyDataProject.mdb)"   Dim DS As New DataSet   Dim DB As New OleDbDataAdapter DS.Clear() Dim Str As String = "SELECT * FROM USERS WHERE UserName='" & TextBox1.Text & "' and UserPass='" & TextBox2.Text & "'" DB = New OleDbDataAdapter(Str, CONN) DB.Fill(DS, "USERS") If DS.Tables("USERS").Rows.Count > 0 Then DB.Dispose() CONN.Dispose()   MessageBox.Show("مبرووووووك لقد تم تسجيل دخولك للبرنامج", " برنامج التحقق من اسم المستخدم ", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button2, MessageBoxOptions.RtlReading) CONN.Dispose() Else MessageBox.Show("تأكد من إدخال كلمة السر أو اسم المستخدم بشكل صحيح", "برنامج التحقق من اسم المستخدم ", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button2, MessageBoxOptions.RtlReading) End If وفي زر الأمر خروج نكتب الكود التالي:   End انتهى الشرح أرجو أن أكون أفدتكم  :blush: :blush: :blush:  
  3. الكامل في قواعد البيانات باستخدام VB.NET

    ماشاء الله عليك وجزاك الله :clapping: جعله الله في ميزان حسناتك
  4. الإضافة إلى ال Datagridview

    السلام عليكم هذه طريقة يمكن تفيدك أخي السراج المنير وهذا الكود يتعامل مع قاعدة بيانات أكسس و VB.2005 أضف ListView إلى الفورم وبعد هذا الآتي:- أولاً : نضيف Function الى كود البرنامج Public Function CheckRows(ByVal Name As String) As Boolean For I As Integer = 0 To Dgrd.Rows.Count - 1 Dim Celname As DataGridViewTextBoxCell = Dgrd.Rows(I).Cells(1) If Celname.Value = Name Then Return True Exit For Else Return False End If Next End Function Private Sub Totalcount() Dim Total1 As Double = 0 Dim Row As DataGridViewRow For Each Row In Dgrd.Rows Dim celV1 As DataGridViewTextBoxCell = Row.Cells(5) If IsNumeric(celV1.Value) = True Then Total1 += celV1.Value End If Next End Sub ثاني شيئ: تعريف Connaction و DataSet و DataAdapter Dim CONN As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Application.StartupPath & "\MyDataProject.mdb") Dim DS As New DataSet Dim DB As New OleDbDataAdapter ثالث شيئ: CONN.Open() For I As Integer = 0 To ListView1.CheckedItems.Count - 1 DS.Clear() DB = New OleDbDataAdapter("SELECT * FROM DitSalary Where Med_ID=" & ListView1.CheckedItems.Item(I).SubItems(0).Text, CONN) DB.Fill(DS, "Med") Dim price As Double = _ 1 * DS.Tables(0).Rows(0).Item(1) Dim ROW As String() = {DS.Tables(0).Rows(0).Item(1), _ DS.Tables(0).Rows(0).Item(1), _ DS.Tables(0).Rows(0).Item(1), _ DS.Tables(0).Rows(0).Item(1), _ 1, price, DS.Tables(0).Rows(0).Item(1)} Dim R As Boolean = CheckRows(DS.Tables(0).Rows(0).Item(1)) If R = False Then Dgrd.Rows.Add(ROW) End If Next '/*** Totalcount() أرجوا ان يكون أفادتك هذه الطريقة
  5. مشكووووووووووووور
  6. مقدمة : ـ إن ASP.NET 2.0 هي الإصدارة الأحدث من Active Server Page حيث ركزت هذه الإصدارة على زيادة إنتاجية المطورين لمواقع الانترنت وكذلك القضايا المرتبطة بالإدارة والمسؤليات ( الصلاحيات وما يتعلق بها ) . بحيث يكون لديك موقع قوي وعلى قدر عالي من الأمان وبأقل قدر من الكود كانت هذه هي الفكرة الأساسية لظهور ASP.NET 2.0. متطلبات دراسة المادة 1. فكرة عن HTML + JavaScript 2. فكرة عن Sql Server أو Access متطلبات تشغيل تطبيق الـ ASP.NET 2.0 1. يفضل ان يكون قد تم تنزيل (IIS) على جهازك ( خدمات معلومات الانترنت ) 2. ويندوز XP بروفيشنال 3. لغة VB.net أو C#.net 4. متصفح انترنت (IE) أهم مميزات اللغة 1. وجود ال Masterpage قوالب التصميم + Themes قوالب التنسيق 2. إمكانية إضفاء الطابع الشخصي للمستخدم (Personalization) بإستخدام [Cookies + Profiles] 3. أدوات إدارة العضوية للمستخدمين Membership. 4. وجود الكثير من الأدوات الجاهزة التي تساعد في التصميم وزيادة الانتاجية. 5. أجزاء الويب WebParts. 6. دعم XML من خلال ASP.NET. 7. دعم قواعد البيانات من خلال تطبيق ASP.NET. تعريف تطبيق الانترنت :ـ هو عمل صفحة على الشبكة العالمية (الإنترنت) لشخص معين أو شركة معينة لنشر معلومات لغرض تسهيل عملية التواصل والتفاعل مع الأخرين . مكونات تطبيق الانترنت التفاعلي 1. مكونات تنفذ من جانب الخادم ( الملقم ) Server مثل طلب بيانات مخزونة في قاعدة بيانات 2. مكونات تنفذ من جانب العميل Client مثل مطابقة كلمة المرور وتأكيد كلمة المرور أو التأكد من أن المستخدم قد أدخل بيانات في حقل معين . ملاحظة : التطبيق قد يحتوي الإثنين معاً . الواجهة الرئيسية:- شريط التنسيق أنواع الأدوات الموجودة في اللغة :ـ تصنف الأدوات الموجودة في لغة ASP.NET الى عدة أنواع كما يوضح الشكل والجدول الذي يليه م النــــــــــــــــوع الـــــــــــوصف 1 General لايحتوي على أدوات وإنما يفيد في إضافة أدوات جديدة . 2 HTML يحتوي أدوات ال HTML الموجودة في ASP.NET . 3 Webparts أدوات مساعدة في تصميم الصفحات وتساعد في عملية الـ Personalization. 4 Login مجموعة من الأدوات المستخدمة في إنشاء المستخدمين وطريقة دخولهم . 5 Navigation أدوات مساعدة في تسهيل عملية التصفح ( التنقل ) مثل الأشجار والقوائم والأداة SiteMap ( خريطة الموقع ) . 6 VaLidation أدوات التحقق من صحة المدخلات مثل أداة التحقق من مطابقة كلمة المرور وتأكيدها والمدى للإدخال وطلب إدخال قيمة في حقل معين . 7 Standards الأدوات القياسية الموجودة بشكل أعتيادي مثل الأداة button & LabaL & Textbox ...... الخ 8 Data تحتوي الأدوات الخاصة بربط قواعد البيانات مع تطبيق الـ ASP.NET أنواع الامتدادات (الملفات) المهمة :ـ يوجد في لغة الـ ASP.NETعدد من الإمتدادات للملفات لعل أهمها هو الموضح في الجدول التالي: م الإســـــم الإمتداد الـــــــــــوصف 1 WebForm Aspx. النماذج الاعتيادية. 2 Masterpage Master. صفحات القوالب المساعدة في التصميم . 3 WebUserControl Ascx. أدوات يقوم ببنائها المستخدم لغرض استخدامها أكثر من مرة فيما بعد. 4 globalfiLe Asax. ملف يحتوي أحداث عامة عن الموقع بشكل عام أو حالة الجلسة . 5 WebConfigurationFile .config ملف يحتوي إعدادات للموقع بشكل عام مثل الصلاحيات والمتغيرات العامة وأي معلومات تساعد في إعداد الموقع الدرس مرفق في ملف وورد ترقبوا الجزء الثاني أخوكم alhadi_tchnosoft للمراسلة :[email protected] ويتم إضافة الملف المطلوب للتطبيق من خلال قائمة Website ثم نختار Add new Item لنحصل على الشكل الموضح أدناه.
  7. مشكووووووووووووووووور
  8. برنامج مخازن محاسبي رائع

    مشكوووووووووووووووووور يعطيك العافية ألف شكر