(14-08-19, 06:25 PM)ابوثامرالحربي كتب : اخى الحبيب
1-هل ترغب بان يكون رقم السجل يضاف يدويا او رقم تلقائى
2-هل ترغب ان تتضمن الشاشة جدول ( الداتا قريد فيو )

انا بخدمتك

---

ملحوظه
اجعل لقاعده البيانات اسم له مدلول :- مثل (Tel_db)
واجعل اسم الجداول الداخليه  لها ابضا مدلول  مثال  لجدول :-  User
وجدول اليوزر يكون مرتب الحقول
User_id
User_Name
User_Age
User_Adress
User_Tel1
User_Tel2
User_Tel3
User_Tel4
User_Tel1
User_Not

ودائما اجعل مسميات الحقول فى الفورم مطابق لمسميات الحقول فى جدول قاعده البيانات
مثال
حقل رقم السجل txtUser_id
وهكذا

لان التنظيم فى العمل يجعل العقل يبدع فى التركيز

انا انتظر ما تامرني له 

تقبل تحياتى

(14-08-19, 08:34 PM)ابراهيم ايبو كتب : السلام عليكم اخي الكريم
الطريقة التي تعتمد عليها في الحفظ هي الوضع المتصل
اما المشكلة لديك في الحفظ هو رقم السجل اذ يجب تحوبله من نص الى رقم
احذف الموديول وقم بوضع هذا الكود للفورم الرئيسي ثم اضف الحقول الناقصة الى جملة Insert حسب مسميات مربعات النصوص لديك 
ولانحتاج الى كتابة اسماء الحقول ثم القيم بل نكتب القيم مباشرة مع الانتباه الى ان الحقول الرقمية في الجدول يجب تحوبلها من نص الى رقم
واليك الكود

كود :

Imports System.Data.OleDb
Imports System.Data
Public Class Form1
   Dim con As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=pho.accdb;Persist Security Info=False;")
   Dim Da As OleDbDataAdapter
   Dim Dt As New DataTable
   Dim Cmd As New OleDbCommand()



   Private Sub save_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles save.Click
       'الوضع المتصل
       Try
           ' انتبه الى الحقل رقم السجل يجب تحويله من نص الى رقم
           Dim Str As String = "insert into ooo values (" & CInt(TextBox1.Text) & ",'" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "')"
           Cmd = New OleDbCommand(Str, con)
           con.Open()
           Cmd.ExecuteNonQuery()

       Catch ex As Exception
           MsgBox("لم يتم الحفظ ", MsgBoxStyle.Critical)
       Finally
           con.Close()
       End Try
   End Sub
End Class

(14-08-19, 09:21 PM)ابراهيم ايبو كتب : اخي لامشكلة اترك الموديول كما تريد 
المهم ان مشكلة الحفظ لديك هي تحوبل من نص الى رقم 
او استخدم باراميترات في الادخال
او استخدم الطريقة المنفصلة كل ذلك بعود لك