Hello and welcome to our community! Is this your first visit?
Register
Enjoy an ad free experience by logging in. Not a member yet? Register.
Results 1 to 3 of 3
  1. #1
    New to the CF scene
    Join Date
    Oct 2012
    Posts
    2
    Thanks
    0
    Thanked 0 Times in 0 Posts

    Visual Basic Problem

    Hello, i'm trying to make my program change a value in a database.
    I've got a database called Account, and a Table called Accounts. I have 4 columns in this table. Id(Key column), UserName, Password and Adminpower.
    What I am trying to do is to make a button change a value in that table. What I do not know is how to make the program know which row i want to change the value in.


    Code:
        Private Sub btnAdmin_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAdmin.Click
            Dim cmd As SqlCommand
            Dim reader As SqlDataReader
            con = New SqlConnection(_connectionString)
            cmd = con.CreateCommand()
            con.Open()
            cmd.CommandText = "ALTER Accounts ('Adminpower') VALUES('1')"
            reader = cmd.ExecuteReader()
            If Not reader.HasRows Then
                MessageBox.Show("Something is wrong.")
            End If
        End Sub
    That's the code so far for the button. So what I want it to do is to change the Adminpower column from 0 to 1 when pressing that button. Yes I have already connected it to the database.
    When I try to press the button I get an error saying that the table doesn't exist.

    Any help is appreciated.
    Thanks


    Screenshots:




    EDIT!!!

    Problem solved. I got it working, I'll keep all the text here if anyone else has a similar problem. And this is what I used:

    Code:
    UPDATE Accounts SET Adminpower = 1 WHERE '" & TextBox1.Text & "' = ""UserName"" AND '" & TextBox2.Text & "' = ""Password"""
    Last edited by Crystalz; 10-05-2012 at 09:16 PM.

  • #2
    Senior Coder alykins's Avatar
    Join Date
    Apr 2011
    Posts
    1,711
    Thanks
    41
    Thanked 191 Times in 190 Posts
    Syntax may be a little bit off....
    Code:
    dim _user as String = txt_UserName.Text
    dim cmdstr as String = String.Format("UPDATE Accounts SET Adminpower = 1 WHERE username = '{0}'", _user)
    
    
    Try
    dim connstr as String = "" ' enter you connection string
    dim conn as new SqlConnection(connstr)
    dim cmd as new SqlCommand(cmdstr, conn)
    cmd.CommandType = CommandType.Text
    
    conn.Open()
    cmd.ExecuteNonQuery()
    conn.Close()
    
    MessageBox.Show("Updated successfully!", "Results", MessageBoxButtons.OK) 
    
    Catch sX as SqlException
    MessageBox.Show("There was a SQL Error!", "Results", MessageBoxButtons.OK) 
    
    Catch eX as Exception
    MessageBox.Show("There was an Error!", "Results", MessageBoxButtons.OK) 
    
    End Try
    obviously this is quick and dirty, but you should be able to build off of this.

    I code C hash-tag .Net
    Reference: W3C W3CWiki .Net Lib
    Validate: html CSS
    Debug: Chrome FireFox IE

  • #3
    New to the CF scene
    Join Date
    Oct 2012
    Posts
    2
    Thanks
    0
    Thanked 0 Times in 0 Posts
    Quote Originally Posted by alykins View Post
    Syntax may be a little bit off....
    Code:
    dim _user as String = txt_UserName.Text
    dim cmdstr as String = String.Format("UPDATE Accounts SET Adminpower = 1 WHERE username = '{0}'", _user)
    
    
    Try
    dim connstr as String = "" ' enter you connection string
    dim conn as new SqlConnection(connstr)
    dim cmd as new SqlCommand(cmdstr, conn)
    cmd.CommandType = CommandType.Text
    
    conn.Open()
    cmd.ExecuteNonQuery()
    conn.Close()
    
    MessageBox.Show("Updated successfully!", "Results", MessageBoxButtons.OK) 
    
    Catch sX as SqlException
    MessageBox.Show("There was a SQL Error!", "Results", MessageBoxButtons.OK) 
    
    Catch eX as Exception
    MessageBox.Show("There was an Error!", "Results", MessageBoxButtons.OK) 
    
    End Try
    obviously this is quick and dirty, but you should be able to build off of this.
    I've got it working already, but I do appreciate it though. This might help someone else with the same question.


  •  

    Tags for this Thread

    Posting Permissions

    • You may not post new threads
    • You may not post replies
    • You may not post attachments
    • You may not edit your posts
    •