gmmorpheus

studentrecords table.,.,contains IDNumber,LastName,Course,Firstname i will login through my system using IDNumber and once i go to the mainform iwant to display LASTname and course to the 2 textboxes in the mainform using the IDNumber as their Primary Key.,.My code errors Dim con As New OleDbConnection Dim cmd As New OleDbCommand …

Private Sub Load_Faculty() Dim con As New OleDbConnection Dim cmd As New OleDbCommand Dim dr As OleDbDataReader Dim arrImage() As Byte Dim myMS As New IO.MemoryStream Dim sSQL As String = String.Empty Try sSQL = "SELECT b.FacultyID, b.Image, b.Course, a.Course" sSQL = sSQL & " FROM studentsrecords as a left …

good pm.,.,i have a next button Try lblcat.Text = ds.Tables("evaluation").Rows(cat)("QuestionCategory") txt1.Text = ds.Tables("evaluation").Rows(CurrentRow)("Question") txt2.Text = ds.Tables("evaluation").Rows(CurrentRow + 1)("Question") txt3.Text = ds.Tables("evaluation").Rows(CurrentRow + 2)("Question") txt4.Text = ds.Tables("evaluation").Rows(CurrentRow + 3)("Question") txt5.Text = ds.Tables("evaluation").Rows(CurrentRow + 4)("Question") Catch ex As Exception End Try every click to the next button my category and questions change.,., …

Private Sub Load_Faculty() Dim con As New OleDbConnection Dim cmd As New OleDbCommand Dim dr As OleDbDataReader Dim arrImage() As Byte Dim myMS As New IO.MemoryStream Dim sSQL As String = String.Empty Try sSQL = "SELECT b.FacultyFirstName, b.Image, b.Course, a.Course" sSQL = sSQL & " FROM studentsrecords as a left …

Private Sub Save_Record() Dim con As New OleDbConnection Dim cmd As New OleDbCommand Dim sSQL As String = String.Empty Dim arrImage() As Byte Dim myMs As New IO.MemoryStream Dim bSaveImage As Boolean = False Dim strImg As String = String.Empty If Not IsNothing(Me.pic1.Image) Then Me.pic1.Image.Save(myMs, Me.pic1.Image.RawFormat) arrImage = myMs.GetBuffer Else …

sir what about if you are using access database???

Private Sub Save_Record() Dim cmd As New OleDbCommand Dim sSQL As String = String.Empty Dim arrImage() As Byte Dim myMs As New IO.MemoryStream Dim bSaveImage As Boolean = False Dim strImg As String = String.Empty Try If Not IsNothing(Me.pic1.Image) Then Me.pic1.Image.Save(myMs, Me.pic1.Image.RawFormat) arrImage = myMs.GetBuffer Else arrImage = Nothing End …