connect vb.net mysql data web pages

Question

4.00/5 (1 vote)

See more:

Hello

have a program running on local machine in my project. The IP address of a particular locale data to the program I'm running a MySQL dataya want to save. But now I get an error.

"Variables, the acceptable range, or out of the wrong types of arguments used in a conflict with someone else"

VB

Imports MySql.Data.MySqlClient
Public Class Form1
    Public conan As New MySqlConnection
    Public rs As New ADODB.Recordset

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim myDB = DBNAME
        Dim myserver = 66.77.144.100 ' IP ADRESS MY MYSQL DATA
        Dim myusername = USer
        Dim mypassword = 12345
        If conan.State = ConnectionState.Closed Then
            conan.ConnectionString = "DATABASE=" & myDB & ";" _ "SERVER=" & myserver & ";user id="& myusername & ";password=" &mypassword
            conan.Open()
        End If
        rs.Open("select * from deneme", conan, 1, 3) 'PROBLEM THIS LINE
End Sub
End Class

VB

[edit]Code block working, "Ignore HTML..." option disabled - OriginalGriff[/edit]

Posted 8-Mar-11 2:42am

vozkan58

Updated 8-Mar-11 2:59am

OriginalGriff

v3

Add a Solution

Comments

Wild-Programmer 8-Mar-11 8:54am

Tried to fix the code formatting but couldn't :(

OriginalGriff 8-Mar-11 9:00am

You needed to disable the "Ignore HTML..." option, was all!

Wild-Programmer 8-Mar-11 10:06am

Oh great! thanks for telling :)

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Aaron @ Think Software · Accepted Answer · 2011-03-08T14:49:00

Is there a reason you are using the ADODB recordset with the MySql database connector? You might have some more luck with the integrated data readers etc built into the MySql connector.

There is a Data Reader that can loop through recordsets similar to opening the recordset that you are doing there just not the same with updating, adding or deleting rows, this is some modified code which might help you get up and running.

VB

Imports MySql.Data.MySqlClient

Public Class Form1
   
    Public conan As New MySqlConnection
    Public dr as MySQLDataReader

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
       
	Dim myDB = "DBNAME"
        Dim myServer = "66.77.144.100" ' IP ADRESS MY MYSQL DATA
        Dim myUsername = "USer"
        Dim myPassword = "12345"

	Dim connectionString as string, sSQL as string
		
	connectionString = "DATABASE=" & myDB & ";SERVER=" & myServer & ";user id="& myUsername & ";password=" & myPassword

        If conan.State = ConnectionState.Closed Then
            conan.ConnectionString = connectionString
            conan.Open()
        End If

	sSQL = "SELECT * FROM deneme;"

	Cmd = New MySqlCommand(sSQL, conan)
	dr = Cmd.ExecuteReader()

	While dr.Read
	    Response.Write dr("fieldname1")
	End While

	dr.Close()

End Sub
End Class