بهتره با کد مثال بزنم براتون
Dim tt As Byte()
If T_Name.Text = Nothing Then
MsgBox("لطفا نام پرسنل را وارد کنید")
Else
Try
tt = IO.File.ReadAllBytes(str_7)
cmd = New SqlCommand
cmd.Connection = con
con.Open()
cmd.CommandText = "INSERT INTO TblKomiteEnzebati (Fname,Lname,CodePersoneli,Shobe,Mantaghe,TarikhEl am,ScanFile,Molahezat)
VALUES (@Fname,@Lname,@CodePersoneli,@Shobe,@Mantaghe,@Ta rikhElam,@ScanFile,@Molahezat)"
cmd.Parameters.AddWithValue("Fname", T_Name.Text)
cmd.Parameters.AddWithValue("Lname", T_LastName.Text)
cmd.Parameters.AddWithValue("CodePersoneli", T_Code_Personeli.Text)
cmd.Parameters.AddWithValue("Shobe", Cbo_ShobeHa.Text)
cmd.Parameters.AddWithValue("Mantaghe", Cbo_Mantaghe.Text)
cmd.Parameters.AddWithValue("TarikhElam", T_Tarikh_Shoro.Text)
cmd.Parameters.AddWithValue("ScanFile", tt)
cmd.Parameters.AddWithValue("Molahezat", T_Molahezat.Text)
If con.State = ConnectionState.Open Then
cmd.ExecuteNonQuery()
Timer1.Enabled = True
Progress_Bar_Main.Visible = True
Progress_Bar_Main.Enabled = True
End If
Catch ex As Exception
MsgBox("خطا در دریافت اطلاعات" & ex.Message)
Finally
con.Close()
End Try
Call Load_GridView()
End If
ما با این کد میایم اطلاعاتی رو ثبت میکنیم ، و همراش پی دی اف رزومش رو هم درج میکنیم تو دیتابیس