Visual Basic

27-Feb-07 5:42

can anyone help me to write a sample update query to update some text and interger fields in my database..i am using sql server 2000...

please send me a sample one that works.. so i can test it and modify it to use in my project...thanks.. having problem writing mine..

Nab

Marcus J. Smith27-Feb-07 5:45

27-Feb-07 5:45

Why dont you post what you have so far and we can point you in the correct direction.

_Cle^AkO

"I think you'll be okay here, they have a thin candy shell. 'Surprised you didn't know that." - Tommy Boy
"Fill it up again! Fill it up again! Once it hits your lips, it's so good!" - Frank the Tank (Old School)

JustmeNick27-Feb-07 5:53

27-Feb-07 5:53

its generated by webmatrix.. but its just not updating a field that is already in the table which has a string value...don't know why..

Dim queryString As String = "UPDATE [R_Application] SET [Fname]=@Fname, [Mname]=@Mname, [Lname]=@Lname WHERE (" & _
"[R_Application].[AppId] = @AppId)"

if the field was null then it works..but if some value exist..it doesn't update...

Nab

Marcus J. Smith27-Feb-07 6:00

27-Feb-07 6:00

Is this the same query it always uses?

JustmeNick27-Feb-07 6:19

27-Feb-07 6:19

yes same query..what wrong with it?... just do one and send it to me..let me try it

Nab

Guffa27-Feb-07 6:10

Guffa

27-Feb-07 6:10

You have to show more of your code.

What you describe doesn't make sense if one only looks at the SQL query. An update query doesn't care if the value in the field is null or not, it updates the field in either case.

---
single minded; short sighted; long gone;

JustmeNick27-Feb-07 6:23

27-Feb-07 6:23

Ok..this is the exact query i am using....

Function testUpdate(ByVal appId As Integer, ByVal fname As String, ByVal lname As String) As Integer

Dim connectionString As String = "server='(local)'; trusted_connection=true; database='TESTDBfhms'"

Dim dbConnection As System.Data.IDbConnection = New System.Data.SqlClient.SqlConnection(connectionString)

Dim queryString As String = "UPDATE [R_Application] SET [Fname]=@Fname, [Lname]=@Lname WHERE ([R_Application]."& _
"[AppId] = @AppId)"

Dim dbCommand As System.Data.IDbCommand = New System.Data.SqlClient.SqlCommand
dbCommand.CommandText = queryString
dbCommand.Connection = dbConnection

Dim dbParam_appId As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
dbParam_appId.ParameterName = "@AppId"
dbParam_appId.Value = appId
dbParam_appId.DbType = System.Data.DbType.Int32
dbCommand.Parameters.Add(dbParam_appId)
Dim dbParam_fname As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
dbParam_fname.ParameterName = "@Fname"
dbParam_fname.Value = fname
dbParam_fname.DbType = System.Data.DbType.[String]
dbCommand.Parameters.Add(dbParam_fname)
Dim dbParam_lname As System.Data.IDataParameter = New System.Data.SqlClient.SqlParameter
dbParam_lname.ParameterName = "@Lname"
dbParam_lname.Value = lname
dbParam_lname.DbType = System.Data.DbType.[String]
dbCommand.Parameters.Add(dbParam_lname)

Dim rowsAffected As Integer = 0
dbConnection.Open
Try
rowsAffected = dbCommand.ExecuteNonQuery
Finally
dbConnection.Close
End Try

Return rowsAffected
End Function

Nab

Guffa27-Feb-07 7:41

Guffa

27-Feb-07 7:41

There is nothing wrong with that code.

Debug the code and watch where you get the values from, as I suggested in the other thread.

---
single minded; short sighted; long gone;

KeyStorke

Karma3125127-Feb-07 5:21

Karma31251

27-Feb-07 5:21

I cant seem to remember how to record keystrokes. Basically i need to use the keystroke value in an IF Statement to say,

if back or delete were pressed then
end if

thanks in advance
Karma

Re: KeyStorke

Marcus J. Smith27-Feb-07 5:45

27-Feb-07 5:45

The windows form as a KeyPress event that you can look at to retrieve the keystroke.

Re: KeyStorke

kubben27-Feb-07 5:46

kubben

27-Feb-07 5:46

Here is some code that should work for you...

Private Sub yourtextbox_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles yourtextbox.KeyDown
'Only allow some control keys
If e.KeyValue = Keys.Delete OrElse e.KeyValue = Keys.Back Then
'good key press
Else
e.Handled = True
End If

End Sub

Hope that helps.
Ben

Re: KeyStorke

JustmeNick27-Feb-07 5:47

program codes in vb - quiz with randomized questions

27-Feb-07 5:47

use the key down event handler as below

Private Sub txtTendered_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles txtTendered.KeyDown

If e.KeyCode = Keys.delete Then
do something here
elseif e.keycode = keys.enter then
do something else
end if

end sub

hope this helps

Nab

Ayensweet27-Feb-07 4:30

Ayensweet

27-Feb-07 4:30

hi there i hope you can help me to find a code for this program..i need it asap cause this is my exam...i hope my mgrespond d2...thankz..uumwaaaaaaaaaahh

at last im officially a member nah?!watz up guyz!

Re: program codes in vb - quiz with randomized questions

Marcus J. Smith27-Feb-07 4:39