Solved

Help Creating a function to change SQL Field Values

Posted on 2007-11-18
1
142 Views
Last Modified: 2011-09-20
Hi all

Im looking for some help in creating a function to allow me to hardcode updates into SQL. The attached code will allow me to open the DB and search the fields however its been a while since ive programmed in vb and am moving to .net so hence the .field("Name") = is a bit out of date..  :)

Any help would be great

Many Thanks
Steve

Code in use __________________________________
       Dim SQL As String = "SELECT * FROM USERINFO WHERE USERNAME = '" & txtUsername.Text & "' AND PASSWORD  = '" & CryptPass & "'"
        Dim sqlReader As SqlDataReader = CCDBC.CCDBC.RetrieveData(SQL)
 
        If sqlReader.Read Then
            With sqlReader
                MsgBox(.GetValue(1) & "   " & .GetValue(2) & "   " & .GetValue(3))
            End With
            Me.Close()
        Else
            MsgBox("Invalid Username or Password entered", MsgBoxStyle.Exclamation)
        End If
        sqlReader.Close()
        sqlReader = Nothing
 
__________________________________________________
 
 
 
 
Public Shared Function GetConnection() As SqlClient.SqlConnection
        Dim conn As SqlClient.SqlConnection
        Dim strConn As String = "Data Source=SQLEXPRESS;Initial Catalog=CC;Integrated Security=True;Pooling=False"
 
        conn = New SqlClient.SqlConnection(strConn)
        Try
            conn.Open()
        Catch ex As SqlClient.SqlException
            Console.WriteLine("SQL Server ERROR: " & ex.Message & " in " & ex.StackTrace)
 
        Catch ex As Exception
            Console.WriteLine("ERROR opening connection: " & ex.Message)
        End Try
        GetConnection = conn
    End Function
 
    Public Shared Function RetrieveData(ByVal query As String) As SqlClient.SqlDataReader
        Dim rdr As SqlClient.SqlDataReader
        Dim conn As SqlClient.SqlConnection = GetConnection()
        Try
            Dim cmd As SqlClient.SqlCommand = New SqlClient.SqlCommand(query, conn)
            ''CommandBehavior.CloseConnection closes the underlying connection 
            ''whenever the reader is closed
            rdr = cmd.ExecuteReader(CommandBehavior.CloseConnection)
        Catch ex As SqlClient.SqlException
            Console.WriteLine("SQL Server ERROR: " & ex.Message & " in " & ex.StackTrace)
        Catch ex As Exception
            Console.WriteLine("ERROR retrieving data: " & ex.Message)
        End Try
        RetrieveData = rdr
    End Function

Open in new window

0
Comment
Question by:Stephen Manderson
1 Comment
 
LVL 143

Accepted Solution

by:
Guy Hengel [angelIII / a3] earned 500 total points
ID: 20310503
please check out this tutorial:
http://webgraphics.web108.discountasp.net/HandH/AdapterUpdate.htm

it tells you to fill in a sqldataadapter, and define the UpdateCommand that will submit the sql update (or procedure) to save any changes done to the data inthe sqldataadapter...

hope this clarifies how to do things the .net way
0

Featured Post

Webinar: Aligning, Automating, Winning

Join Dan Russo, Senior Manager of Operations Intelligence, for an in-depth discussion on how Dealertrack, leading provider of integrated digital solutions for the automotive industry, transformed their DevOps processes to increase collaboration and move with greater velocity.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

It’s quite interesting for me as I worked with Excel using vb.net for some time. Here are some topics which I know want to share with others whom this might help. First of all if you are working with Excel then you need to Download the Following …
Calculating holidays and working days is a function that is often needed yet it is not one found within the Framework. This article presents one approach to building a working-day calculator for use in .NET.
Although Jacob Bernoulli (1654-1705) has been credited as the creator of "Binomial Distribution Table", Gottfried Leibniz (1646-1716) did his dissertation on the subject in 1666; Leibniz you may recall is the co-inventor of "Calculus" and beat Isaac…

820 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question