[حريف برمجة]

كود :

Dim cmd As New OleDbCommand("INSERT INTO Rays (Name,Date,PicPath)values(@Name,@Date,@PicPath)", CON)

مبدئياً السطر هذا يكون كذا دام انك كاتب البارامتر اسفل هكذا

            cmd.Parameters.AddWithValue("@Name", OleDbType.VarChar).Value = Trim(AddRay.TextBox1.Text)

            cmd.Parameters.AddWithValue("@Date", OleDbType.Date).Value = Date.Today

            cmd.Parameters.AddWithValue("@PicPath", OleDbType.VarChar).Value = PicPath