1.11M Members

how to connect sql database with vb.net form

 
0
 

i want to connect the sql dabase to vb.net form. can anyone tel me how to do it. i tired google. but it only says about ms access database.

please help me

 
0
 

Go into database explorer click connect to database

 
0
 

In code you can do it this way

Imports System.Data
Imports System.Data.SqlClient
Public conn As SqlConnection
conn = New SqlConnection("server = SRVERNAME ;database = DATABASENAME;Trusted_Connection = yes")

Then you can use conn.Open to open the connection and conn.close to close it.

 
0
 

Imports System.Data.SqlClient
Dim con As New SqlClient.SqlConnection("data source=DATASOURCE;initial catalog=NAME OF DATABASE;Integrated Security=True")
Dim cmd As New SqlCommand()
cmd.Connection = con
con.Open()
con.Close()

THIS IS WHAT I USE TO CONNECT SQL TO VB.NET
this is a sample code below:

Imports System.Data.SqlClient

Public Class NEW_PERSONAL_INFORMATION

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim con As New SqlClient.SqlConnection("data source=ROOM310-40\SQLEXPRESS;initial catalog=DTIS;Integrated Security=True")
Dim cmd As New SqlCommand()
cmd.Connection = con
con.Open()
cmd.CommandText = "insert into perinfo values ('" & empid.Text & "','" & sname.Text & "','" & fname.Text & "','" & mname.Text & "','" & birthdate.Text & "','" & birthplace.Text & "','" & gender.Text & "','" & cstatus.Text & "','" & citizenship.Text & "','" & height.Text & "','" & weight.Text & "','" & btype.Text & "','" & address.Text & "','" & cp.Text & "','" & zcode.Text & "','" & telno.Text & "','" & email.Text & "','" & fathername.Text & "','" & mothername.Text & "'')"
cmd.ExecuteNonQuery()

MsgBox("Record is successfully stored")
con.Close()
End Sub
End Class

hope this can help

 
0
 

Thanks a lot

i have did it.. but when i try to debug.. it gives me a error.. can anyone tell me y

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click


Dim con As New SqlClient.SqlConnection("data source=D:\Crap\Dialog Application Check Bill\Dialog Bill Check\Dialog Bill Check\database.mdf")
Dim cmd As New SqlCommand()
cmd.Connection = con
con.Open()
cmd.CommandText = "insert into DailySMS values ('" & txtInternational.Text & "','" & txtLocal.Text & "')"
cmd.ExecuteNonQuery()

MsgBox("Record is successfully stored")
con.Close()

End Sub
End Class

 
0
 

Imports System.Data.SqlClient
Dim con As New SqlClient.SqlConnection("data source=DATASOURCE;initial catalog=NAME OF DATABASE;Integrated Security=True")
Dim cmd As New SqlCommand()
cmd.Connection = con
con.Open()
con.Close()

THIS IS WHAT I USE TO CONNECT SQL TO VB.NET
this is a sample code below:

Imports System.Data.SqlClient

Public Class NEW_PERSONAL_INFORMATION

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim con As New SqlClient.SqlConnection("data source=ROOM310-40\SQLEXPRESS;initial catalog=DTIS;Integrated Security=True")
Dim cmd As New SqlCommand()
cmd.Connection = con
con.Open()
cmd.CommandText = "insert into perinfo values ('" & empid.Text & "','" & sname.Text & "','" & fname.Text & "','" & mname.Text & "','" & birthdate.Text & "','" & birthplace.Text & "','" & gender.Text & "','" & cstatus.Text & "','" & citizenship.Text & "','" & height.Text & "','" & weight.Text & "','" & btype.Text & "','" & address.Text & "','" & cp.Text & "','" & zcode.Text & "','" & telno.Text & "','" & email.Text & "','" & fathername.Text & "','" & mothername.Text & "'')"
cmd.ExecuteNonQuery()

MsgBox("Record is successfully stored")
con.Close()
End Sub
End Class

hope this can help

i have copied paste your code and edited it.. but it asking con is not declared..

 
0
 

There are two sets of code in the above reply:

Imports System.Data.SqlClient
Dim con As New SqlClient.SqlConnection("data source=DATASOURCE;initial catalog=NAME OF DATABASE;Integrated Security=True")
Dim cmd As New SqlCommand()
cmd.Connection = con
con.Open()
con.Close()

and

Imports System.Data.SqlClient

Public Class NEW_PERSONAL_INFORMATION

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim con As New SqlClient.SqlConnection("data source=ROOM310-40\SQLEXPRESS;initial catalog=DTIS;Integrated Security=True")
Dim cmd As New SqlCommand()
cmd.Connection = con
con.Open()
cmd.CommandText = "insert into perinfo values ('" & empid.Text & "','" & sname.Text & "','" & fname.Text & "','" & mname.Text & "','" & birthdate.Text & "','" & birthplace.Text & "','" & gender.Text & "','" & cstatus.Text & "','" & citizenship.Text & "','" & height.Text & "','" & weight.Text & "','" & btype.Text & "','" & address.Text & "','" & cp.Text & "','" & zcode.Text & "','" & telno.Text & "','" & email.Text & "','" & fathername.Text & "','" & mothername.Text & "'')"
cmd.ExecuteNonQuery()

MsgBox("Record is successfully stored")
con.Close()
End Sub
End Class

Which one are you speaking of?

 
0
 

i want to connect the sql dabase to vb.net form. can anyone tel me how to do it. i tired google. but it only says about ms access database.

please help me

hi i need help guys please give mo some codes to connect Vb to database..thank you.....im hoping for positive response...

 
0
 

For connection from a visual basic form to database , you need a connection string first like the following

connetionString = "Data Source=ServerName;Initial Catalog=DatabaseName;User ID=UserName;Password=Password"

you have to fill your database information to this connectionstring.

drag a button control to a form and put the follwoing code in to click event

    Dim connetionString As String
    Dim cnn As SqlConnection
    connetionString = "Data Source=ServerName;Initial Catalog=DatabaseName;User ID=UserName;Password=Password"
    cnn = New SqlConnection(connetionString)
    Try
        cnn.Open()
        MsgBox("Connection Open ! ")
        cnn.Close()
    Catch ex As Exception
        MsgBox("Can not open connection ! ")
    End Try

If you need more programming information

http://vb.net-informations.com/ado.net-dataproviders/ado.net-dataproviders-tutorial.htm

you will get all necessary help from above link

algor

 
0
 
Imports System.Data.SqlClient
Dim con As New SqlClient.SqlConnection("data source=DATASOURCE;initial catalog=NAME OF DATABASE;Integrated Security=True")
Dim cmd As New SqlCommand()  
cmd.Connection = con            <--- Here is an erro - Declaration required for 'cmd'
con.Open()
con.Close()

pls try to solve this
im using visual studio 2010
ms sql 2008

 
0
 
Dim con as sqlclient.sqlconnection = new sqlclient.sqlconnection(Data source=servername;Initial Catalog=databasename;Integrated Security=True;)
Dim cmd as sqlclient.sqlcommand
cmd = new sqlclient.sqlcommand("insert into tblsample(one_one)values('"  & txtone.text & "')",con)
if con.state = connection.closed then con.open
cmd.executenonquery()
msgbox ("Saved.")
con.close

Dont't forget to import - Imports System.Data.SqlClient at the top.

You
This article has been dead for over six months: Start a new discussion instead
Post:
Start New Discussion
Tags Related to this Article