[jake_lyson]

Sir pano ko po magagawa to gamit ang Data.OLEDB at MS Access ang back end?

                    myCommand = New SqlCommand("InsertNewUserInfo", ProjectConnection)
                    With myCommand
                        .CommandType = CommandType.StoredProcedure
                        .Parameters.AddWithValue("vUserId", Trim(txtUserID.Text))
                        .Parameters.AddWithValue("vScId", Trim(txtSCID.Text))
                        .Parameters.AddWithValue("vLastName", Trim(txtLname.Text))
                        .Parameters.AddWithValue("vFirstName", Trim(txtFName.Text))
                        .Parameters.AddWithValue("vMI", Trim(txtMI.Text))
                        .Parameters.AddWithValue("vUserLevel", Trim(txtUserLevel.Text))
                        .Parameters.AddWithValue("vPassword", Trim(txtPassword.Text))
                        .Parameters.AddWithValue("vSupervisorLevel", IIf(cboSupervisorLevel.CheckState = CheckState.Checked, 1, 0))
                        .ExecuteNonQuery()
                        MsgBox("User Id " & Trim(txtUserID.Text) & " added successfully.", MsgBoxStyle.Information, "New User Added")
                    End With
                    myCommand.Dispose()

[nexysllanes]

dito magagamit ko tu next sem hehe

[vespercore02]

Maraming Salamat po

[Lenece22]

Hello po .. pa help naman po .. sinu po ung mabait at mag bibigay ng source code sa student information system .. sample lang po ksi wla po akong idea sa gagawin kong programm . sana po matulungan niyo ako . begginer palang po ako .. slamat po ..

[potbulb]

salamat dito sir

[itsmemarjorie]

Pwede po mag tanong ng inventory code? sa VB6

sa sasagot.

[wrredraye]

Originally Posted by jake_lyson

Sir pano ko po magagawa to gamit ang Data.OLEDB at MS Access ang back end?

                    myCommand = New SqlCommand("InsertNewUserInfo", ProjectConnection)
                    With myCommand
                        .CommandType = CommandType.StoredProcedure
                        .Parameters.AddWithValue("vUserId", Trim(txtUserID.Text))
                        .Parameters.AddWithValue("vScId", Trim(txtSCID.Text))
                        .Parameters.AddWithValue("vLastName", Trim(txtLname.Text))
                        .Parameters.AddWithValue("vFirstName", Trim(txtFName.Text))
                        .Parameters.AddWithValue("vMI", Trim(txtMI.Text))
                        .Parameters.AddWithValue("vUserLevel", Trim(txtUserLevel.Text))
                        .Parameters.AddWithValue("vPassword", Trim(txtPassword.Text))
                        .Parameters.AddWithValue("vSupervisorLevel", IIf(cboSupervisorLevel.CheckState = CheckState.Checked, 1, 0))
                        .ExecuteNonQuery()
                        MsgBox("User Id " & Trim(txtUserID.Text) & " added successfully.", MsgBoxStyle.Information, "New User Added")
                    End With
                    myCommand.Dispose()

_____________________________
Oleda.InsertCommand = New OleDbCommand()
Oleda.InsertCommand.CommandText = "INSERT INTO [InsertNewUserInfo] ([vUserID] , [vScId] )" & _
"VALUES (@vUserID , @vScId)"
Oleda.InsertCommand.Connection = Olecn
With Oleda
.InsertCommand.Parameters.Add("@vUserID", OleDbType.VarWChar, 50, "User ID").Value = me.txtID.Text
.InsertCommand.Parameters.Add("@vScId", OleDbType.VarWChar, 50, "vScId").Value = me.txtvScId.Text
MsgBox("User Id " & Trim(txtUserID.Text) & " added successfully.", MsgBoxStyle.Information, "New User Added")
.InsertCommand.ExecuteNonQuery()
End With

[imvincentocampo]

madownload nga thanks po

[damnskaterboi]

tnx po dito pa subscribe din muna dami pa download sa net tnx

[healbuff]

mga masters,

advisable po ba gumamit ng bindingsource sa mga database application..dati po akong gumagamit ng hard coded db commands, medyo mahirap na kasi pag madami n fields ng tables.. if i may ask, which one would u prefer, hardcode or using bindings & etc..

tnx...sori medyo noob pa po ako..