| Author: Yousuf 22 Nov 2008 | Member Level: Silver | Rating:  Points: 6 |
hi
This code might help u
Public Shared Function GetConnection()
Dim myConnection As String
myConnection = "Database=qasion;Data Source=localhost;User Id=root;Password=root"
'getGetconnection = ConfigurationManager.ConnectionStrings("").ConnectionString
Return myConnection
End Function
Public Function Insert(ByVal StrQuery As String) As Integer
Dim con As New MySqlConnection(GetConnection().ToString)
Dim cmd As New MySqlCommand(StrQuery, con)
Dim objtrans As MySqlTransaction
Dim intAffectRows As Integer
Try
'objtrans = con.BeginTransaction
With cmd
.Connection.Open()
intAffectRows = .ExecuteNonQuery()
If intAffectRows <= -1 Or 0 Then
cmd.Transaction.Rollback()
.Connection.Close()
End If
'objtrans.Commit()
' .Connection.Close()
End With
If intAffectRows < 0 Then
cmd.Transaction.Rollback()
Else
Return intAffectRows
End If
Catch ex As Exception
Throw ex
End Try
End Function
|