cannot connect sql server with sqlDataAdapter

S

Sabri Arslan

when i have tried connect local or remote server i have give below error
message.

An unhandled exceptin of type 'System.Data.SqlClient.SqlException'
occured in system.data.dll

Additional information: System Error

i use below command
Public Class Form1

Inherits System.Windows.Forms.Form

#Region " Windows Form Designer generated code "

Public Sub New()

MyBase.New()

'This call is required by the Windows Form Designer.

InitializeComponent()

'Add any initialization after the InitializeComponent() call

End Sub

'Form overrides dispose to clean up the component list.

Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)

If disposing Then

If Not (components Is Nothing) Then

components.Dispose()

End If

End If

MyBase.Dispose(disposing)

End Sub

'Required by the Windows Form Designer

Private components As System.ComponentModel.IContainer

'NOTE: The following procedure is required by the Windows Form Designer

'It can be modified using the Windows Form Designer.

'Do not modify it using the code editor.

Friend WithEvents SqlDataAdapter1 As System.Data.SqlClient.SqlDataAdapter

Friend WithEvents SqlSelectCommand1 As System.Data.SqlClient.SqlCommand

Friend WithEvents SqlInsertCommand1 As System.Data.SqlClient.SqlCommand

Friend WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection

Friend WithEvents DataSet11 As WindowsApplication2.DataSet1

<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()

Me.SqlDataAdapter1 = New System.Data.SqlClient.SqlDataAdapter

Me.SqlSelectCommand1 = New System.Data.SqlClient.SqlCommand

Me.SqlInsertCommand1 = New System.Data.SqlClient.SqlCommand

Me.SqlConnection1 = New System.Data.SqlClient.SqlConnection

Me.DataSet11 = New WindowsApplication2.DataSet1

CType(Me.DataSet11, System.ComponentModel.ISupportInitialize).BeginInit()

'

'SqlDataAdapter1

'

Me.SqlDataAdapter1.InsertCommand = Me.SqlInsertCommand1

Me.SqlDataAdapter1.SelectCommand = Me.SqlSelectCommand1

Me.SqlDataAdapter1.TableMappings.AddRange(New
System.Data.Common.DataTableMapping() {New
System.Data.Common.DataTableMapping("Table", "tblreg", New
System.Data.Common.DataColumnMapping() {New
System.Data.Common.DataColumnMapping("ID", "ID"), New
System.Data.Common.DataColumnMapping("FirstName", "FirstName"), New
System.Data.Common.DataColumnMapping("LastName", "LastName"), New
System.Data.Common.DataColumnMapping("Address1", "Address1"), New
System.Data.Common.DataColumnMapping("Address2", "Address2"), New
System.Data.Common.DataColumnMapping("Il", "Il"), New
System.Data.Common.DataColumnMapping("City", "City"), New
System.Data.Common.DataColumnMapping("State", "State"), New
System.Data.Common.DataColumnMapping("Zip", "Zip"), New
System.Data.Common.DataColumnMapping("Phone", "Phone"), New
System.Data.Common.DataColumnMapping("Fax", "Fax"), New
System.Data.Common.DataColumnMapping("Email", "Email"), New
System.Data.Common.DataColumnMapping("CardType", "CardType"), New
System.Data.Common.DataColumnMapping("CardNum", "CardNum"), New
System.Data.Common.DataColumnMapping("Exp1", "Exp1"), New
System.Data.Common.DataColumnMapping("Exp2", "Exp2"), New
System.Data.Common.DataColumnMapping("Cvv", "Cvv"), New
System.Data.Common.DataColumnMapping("UserOrder", "UserOrder"), New
System.Data.Common.DataColumnMapping("Product_Id", "Product_Id"), New
System.Data.Common.DataColumnMapping("Product_Adet", "Product_Adet"), New
System.Data.Common.DataColumnMapping("Product_Fiyat", "Product_Fiyat"), New
System.Data.Common.DataColumnMapping("Product_Toplam", "Product_Toplam"),
New System.Data.Common.DataColumnMapping("Product_KDV", "Product_KDV"), New
System.Data.Common.DataColumnMapping("Product_Tutar", "Product_Tutar"), New
System.Data.Common.DataColumnMapping("Product_Name", "Product_Name"), New
System.Data.Common.DataColumnMapping("Tarih", "Tarih"), New
System.Data.Common.DataColumnMapping("TransId", "TransId"), New
System.Data.Common.DataColumnMapping("OrderId", "OrderId"), New
System.Data.Common.DataColumnMapping("GroupId", "GroupId"), New
System.Data.Common.DataColumnMapping("OrderType", "OrderType"), New
System.Data.Common.DataColumnMapping("onay", "onay"), New
System.Data.Common.DataColumnMapping("Grup", "Grup")})})

'

'SqlSelectCommand1

'

Me.SqlSelectCommand1.CommandText = "SELECT ID, FirstName, LastName,
Address1, Address2, Il, City, State, Zip, Phone, " & _

"Fax, Email, CardType, CardNum, Exp1, Exp2, Cvv, UserOrder, Product_Id,
Product_A" & _

"det, Product_Fiyat, Product_Toplam, Product_KDV, Product_Tutar,
Product_Name, Ta" & _

"rih, TransId, OrderId, GroupId, OrderType, onay, Grup FROM tblreg"

Me.SqlSelectCommand1.Connection = Me.SqlConnection1

'

'SqlInsertCommand1

'

Me.SqlInsertCommand1.CommandText = "INSERT INTO tblreg(FirstName, LastName,
Address1, Address2, Il, City, State, Zip," & _

" Phone, Fax, Email, CardType, CardNum, Exp1, Exp2, Cvv, UserOrder,
Product_Id, P" & _

"roduct_Adet, Product_Fiyat, Product_Toplam, Product_KDV, Product_Tutar,
Product_" & _

"Name, Tarih, TransId, OrderId, GroupId, OrderType, onay, Grup) VALUES
(@FirstNam" & _

"e, @LastName, @Address1, @Address2, @Il, @City, @State, @Zip, @Phone, @Fax,
@Ema" & _

"il, @CardType, @CardNum, @Exp1, @Exp2, @Cvv, @UserOrder, @Product_Id,
@Product_A" & _

"det, @Product_Fiyat, @Product_Toplam, @Product_KDV, @Product_Tutar,
@Product_Nam" & _

"e, @Tarih, @TransId, @OrderId, @GroupId, @OrderType, @onay, @Grup); SELECT
ID, F" & _

"irstName, LastName, Address1, Address2, Il, City, State, Zip, Phone, Fax,
Email," & _

" CardType, CardNum, Exp1, Exp2, Cvv, UserOrder, Product_Id, Product_Adet,
Produc" & _

"t_Fiyat, Product_Toplam, Product_KDV, Product_Tutar, Product_Name, Tarih,
TransI" & _

"d, OrderId, GroupId, OrderType, onay, Grup FROM tblreg"

Me.SqlInsertCommand1.Connection = Me.SqlConnection1

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@FirstName",
System.Data.SqlDbType.NVarChar, 50, "FirstName"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@LastName",
System.Data.SqlDbType.NVarChar, 50, "LastName"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Address1",
System.Data.SqlDbType.NVarChar, 50, "Address1"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Address2",
System.Data.SqlDbType.NVarChar, 50, "Address2"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Il", System.Data.SqlDbType.NVarChar,
50, "Il"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@City", System.Data.SqlDbType.NVarChar,
50, "City"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@State", System.Data.SqlDbType.NVarChar,
50, "State"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Zip", System.Data.SqlDbType.NVarChar,
50, "Zip"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Phone", System.Data.SqlDbType.NVarChar,
50, "Phone"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Fax", System.Data.SqlDbType.NVarChar,
50, "Fax"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Email", System.Data.SqlDbType.NVarChar,
50, "Email"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@CardType",
System.Data.SqlDbType.NVarChar, 50, "CardType"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@CardNum",
System.Data.SqlDbType.NVarChar, 50, "CardNum"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Exp1", System.Data.SqlDbType.NVarChar,
50, "Exp1"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Exp2", System.Data.SqlDbType.NVarChar,
50, "Exp2"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Cvv", System.Data.SqlDbType.NVarChar,
50, "Cvv"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@UserOrder",
System.Data.SqlDbType.NVarChar, 50, "UserOrder"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Product_Id",
System.Data.SqlDbType.NVarChar, 50, "Product_Id"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Product_Adet",
System.Data.SqlDbType.NVarChar, 50, "Product_Adet"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Product_Fiyat",
System.Data.SqlDbType.NVarChar, 50, "Product_Fiyat"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Product_Toplam",
System.Data.SqlDbType.NVarChar, 50, "Product_Toplam"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Product_KDV",
System.Data.SqlDbType.NVarChar, 50, "Product_KDV"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Product_Tutar",
System.Data.SqlDbType.NVarChar, 50, "Product_Tutar"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Product_Name",
System.Data.SqlDbType.NVarChar, 50, "Product_Name"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Tarih", System.Data.SqlDbType.NVarChar,
50, "Tarih"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@TransId",
System.Data.SqlDbType.NVarChar, 50, "TransId"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@OrderId",
System.Data.SqlDbType.NVarChar, 50, "OrderId"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@GroupId",
System.Data.SqlDbType.NVarChar, 50, "GroupId"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@OrderType",
System.Data.SqlDbType.NVarChar, 50, "OrderType"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@onay", System.Data.SqlDbType.NVarChar,
50, "onay"))

Me.SqlInsertCommand1.Parameters.Add(New
System.Data.SqlClient.SqlParameter("@Grup", System.Data.SqlDbType.NVarChar,
50, "Grup"))

'

'SqlConnection1

'

Me.SqlConnection1.ConnectionString = "workstation id=SEK01;packet
size=4096;user id=sa;data source=""SNX"";persis" & _

"t security info=False;initial catalog=shoppingregs"

'

'DataSet11

'

Me.DataSet11.DataSetName = "DataSet1"

Me.DataSet11.Locale = New System.Globalization.CultureInfo("tr-TR")

'

'Form1

'

Me.AutoScaleBaseSize = New System.Drawing.Size(5, 13)

Me.ClientSize = New System.Drawing.Size(292, 273)

Me.Name = "Form1"

Me.Text = "Form1"

CType(Me.DataSet11, System.ComponentModel.ISupportInitialize).EndInit()

End Sub

#End Region

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load

SqlDataAdapter1.Fill(DataSet11)

End Sub

End Class



please help me!
 
Top