machine.config里地: <add name="SqlClient Data Provider" invariant="System.Data.SqlClient" description=".Net Framework Data Provider for SqlServer" type="System.Data.SqlClient.SqlClientFactory, System.Data, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
wince和WIN不是一样的么 SqlParameter[] paras = new SqlParameter[2] { new SqlParameter("@BC_NO", SqlDbType.VarChar, 30), new SqlParameter("@QTY", SqlDbType.Int, 4) }; paras[0].Value = strBC_NO; paras[1].Value = iSmallBoxQty; SqlCommand cmd = new SqlCommand(); cmd.CommandText = "PROC_DEV"; cmd.Connection = conn; cmd.CommandType = CommandType.StoredProcedure; cmd.ExecuteNonQuery(); iResult = Int32.Parse(cmd.Parameters["ReturnValue"].Value.ToString());存储过程的名字是PROC_DEV
scy2510(学计算机的农民) 看不懂你到这里干什么来了?回家种地去吧
楼上的 我拷贝到程序里了,但是不能编译 应该using那些命名空间呢 所有的对象都找不到定义^^^
VB的代码是这样写的 没有存储过程的代码:://部分代码Public Class SQLHelper Friend WithEvents SqlDataAdapter1 As System.Data.SqlClient.SqlDataAdapter Friend WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection Friend WithEvents SqlDataAdapter2 As System.Data.SqlClient.SqlDataAdapter Friend SqlSelectCommand2 As System.Data.SqlClient.SqlCommand Friend SqlInsertCommand2 As System.Data.SqlClient.SqlCommand Friend SqlUpdateCommand2 As System.Data.SqlClient.SqlCommand Friend SqlDeleteCommand2 As System.Data.SqlClient.SqlCommand Friend SqlSelectCommand1 As System.Data.SqlClient.SqlCommand Friend SqlInsertCommand1 As System.Data.SqlClient.SqlCommand Friend SqlUpdateCommand1 As System.Data.SqlClient.SqlCommand Friend SqlDeleteCommand1 As System.Data.SqlClient.SqlCommand Friend WithEvents SqlDataAdapter3 As System.Data.SqlClient.SqlDataAdapter Friend SqlSelectCommand3 As System.Data.SqlClient.SqlCommand Friend SqlInsertCommand3 As System.Data.SqlClient.SqlCommand Friend SqlUpdateCommand3 As System.Data.SqlClient.SqlCommand Friend SqlDeleteCommand3 As System.Data.SqlClient.SqlCommand Friend WithEvents SqlDataAdapter4 As System.Data.SqlClient.SqlDataAdapter Friend SqlSelectCommand4 As System.Data.SqlClient.SqlCommand Friend SqlInsertCommand4 As System.Data.SqlClient.SqlCommand Friend SqlUpdateCommand4 As System.Data.SqlClient.SqlCommand Friend SqlDeleteCommand4 As System.Data.SqlClient.SqlCommand Sub New(ByVal svr As String, ByVal usr As String, ByVal pwd As String) Me.SqlDataAdapter1 = New System.Data.SqlClient.SqlDataAdapter Me.SqlConnection1 = New System.Data.SqlClient.SqlConnection Me.SqlDataAdapter2 = New System.Data.SqlClient.SqlDataAdapter Me.SqlSelectCommand2 = New System.Data.SqlClient.SqlCommand Me.SqlInsertCommand2 = New System.Data.SqlClient.SqlCommand Me.SqlUpdateCommand2 = New System.Data.SqlClient.SqlCommand Me.SqlDeleteCommand2 = New System.Data.SqlClient.SqlCommand Me.SqlSelectCommand1 = New System.Data.SqlClient.SqlCommand Me.SqlInsertCommand1 = New System.Data.SqlClient.SqlCommand Me.SqlUpdateCommand1 = New System.Data.SqlClient.SqlCommand Me.SqlDeleteCommand1 = New System.Data.SqlClient.SqlCommand Me.SqlDataAdapter3 = New System.Data.SqlClient.SqlDataAdapter Me.SqlSelectCommand3 = New System.Data.SqlClient.SqlCommand Me.SqlInsertCommand3 = New System.Data.SqlClient.SqlCommand Me.SqlUpdateCommand3 = New System.Data.SqlClient.SqlCommand Me.SqlDeleteCommand3 = New System.Data.SqlClient.SqlCommand Me.SqlDataAdapter4 = New System.Data.SqlClient.SqlDataAdapter Me.SqlSelectCommand4 = New System.Data.SqlClient.SqlCommand Me.SqlInsertCommand4 = New System.Data.SqlClient.SqlCommand Me.SqlUpdateCommand4 = New System.Data.SqlClient.SqlCommand Me.SqlDeleteCommand4 = New System.Data.SqlClient.SqlCommand ' 'SqlDataAdapter1 ' Me.SqlDataAdapter1.DeleteCommand = Me.SqlDeleteCommand1 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", "Customers", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("CustomerID", "CustomerID"), New System.Data.Common.DataColumnMapping("CompanyName", "CompanyName"), New System.Data.Common.DataColumnMapping("ContactName", "ContactName"), New System.Data.Common.DataColumnMapping("ContactTitle", "ContactTitle"), New System.Data.Common.DataColumnMapping("Address", "Address"), New System.Data.Common.DataColumnMapping("City", "City"), New System.Data.Common.DataColumnMapping("Region", "Region"), New System.Data.Common.DataColumnMapping("PostalCode", "PostalCode"), New System.Data.Common.DataColumnMapping("Country", "Country"), New System.Data.Common.DataColumnMapping("Phone", "Phone"), New System.Data.Common.DataColumnMapping("Fax", "Fax")})}) Me.SqlDataAdapter1.UpdateCommand = Me.SqlUpdateCommand1 ' This check is to ensure that the connection constants ' have been modified before deployment. If svr = "" And usr = "" And pwd = "" Then MessageBox.Show( _ "You have not modified the SQL connection settings for this sample. " & _ "Please click on the 'Settings' tab and enter your connection details. " _ ) End If ' 'SqlConnection1 ' Me.SqlConnection1.ConnectionString = _ "data source=" & svr & ";" & _ "user id=" & usr & ";" & _ "password=" & pwd & ";" & _ "initial catalog=Northwind;" & _ "persist security info=True;" & _ "packet size=4096" ' 'SqlDataAdapter2 ' Me.SqlDataAdapter2.DeleteCommand = Me.SqlDeleteCommand2 Me.SqlDataAdapter2.InsertCommand = Me.SqlInsertCommand2 Me.SqlDataAdapter2.SelectCommand = Me.SqlSelectCommand2 Me.SqlDataAdapter2.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "Orders", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("OrderID", "OrderID"), New System.Data.Common.DataColumnMapping("CustomerID", "CustomerID"), New System.Data.Common.DataColumnMapping("EmployeeID", "EmployeeID"), New System.Data.Common.DataColumnMapping("OrderDate", "OrderDate"), New System.Data.Common.DataColumnMapping("RequiredDate", "RequiredDate"), New System.Data.Common.DataColumnMapping("ShippedDate", "ShippedDate"), New System.Data.Common.DataColumnMapping("ShipVia", "ShipVia"), New System.Data.Common.DataColumnMapping("Freight", "Freight"), New System.Data.Common.DataColumnMapping("ShipName", "ShipName"), New System.Data.Common.DataColumnMapping("ShipAddress", "ShipAddress"), New System.Data.Common.DataColumnMapping("ShipCity", "ShipCity"), New System.Data.Common.DataColumnMapping("ShipRegion", "ShipRegion"), New System.Data.Common.DataColumnMapping("ShipPostalCode", "ShipPostalCode"), New System.Data.Common.DataColumnMapping("ShipCountry", "ShipCountry")})}) Me.SqlDataAdapter2.UpdateCommand = Me.SqlUpdateCommand2 ' 'SqlSelectCommand2 ' Me.SqlSelectCommand2.CommandText = "SELECT OrderID, CustomerID, EmployeeID, OrderDate, RequiredDate, ShippedDate, Shi" & _ "pVia, Freight, ShipName, ShipAddress, ShipCity, ShipRegion, ShipPostalCode, Ship" & _ "Country FROM dbo.Orders" Me.SqlSelectCommand2.Connection = Me.SqlConnection1
<add name="SqlClient Data Provider" invariant="System.Data.SqlClient" description=".Net Framework Data Provider for SqlServer" type="System.Data.SqlClient.SqlClientFactory, System.Data, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" />
SqlParameter[] paras = new SqlParameter[2] {
new SqlParameter("@BC_NO", SqlDbType.VarChar, 30),
new SqlParameter("@QTY", SqlDbType.Int, 4)
};
paras[0].Value = strBC_NO;
paras[1].Value = iSmallBoxQty; SqlCommand cmd = new SqlCommand();
cmd.CommandText = "PROC_DEV";
cmd.Connection = conn;
cmd.CommandType = CommandType.StoredProcedure;
cmd.ExecuteNonQuery();
iResult = Int32.Parse(cmd.Parameters["ReturnValue"].Value.ToString());存储过程的名字是PROC_DEV
看不懂你到这里干什么来了?回家种地去吧
我拷贝到程序里了,但是不能编译
应该using那些命名空间呢
所有的对象都找不到定义^^^
没有存储过程的代码:://部分代码Public Class SQLHelper Friend WithEvents SqlDataAdapter1 As System.Data.SqlClient.SqlDataAdapter
Friend WithEvents SqlConnection1 As System.Data.SqlClient.SqlConnection
Friend WithEvents SqlDataAdapter2 As System.Data.SqlClient.SqlDataAdapter
Friend SqlSelectCommand2 As System.Data.SqlClient.SqlCommand
Friend SqlInsertCommand2 As System.Data.SqlClient.SqlCommand
Friend SqlUpdateCommand2 As System.Data.SqlClient.SqlCommand
Friend SqlDeleteCommand2 As System.Data.SqlClient.SqlCommand
Friend SqlSelectCommand1 As System.Data.SqlClient.SqlCommand
Friend SqlInsertCommand1 As System.Data.SqlClient.SqlCommand
Friend SqlUpdateCommand1 As System.Data.SqlClient.SqlCommand
Friend SqlDeleteCommand1 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlDataAdapter3 As System.Data.SqlClient.SqlDataAdapter
Friend SqlSelectCommand3 As System.Data.SqlClient.SqlCommand
Friend SqlInsertCommand3 As System.Data.SqlClient.SqlCommand
Friend SqlUpdateCommand3 As System.Data.SqlClient.SqlCommand
Friend SqlDeleteCommand3 As System.Data.SqlClient.SqlCommand
Friend WithEvents SqlDataAdapter4 As System.Data.SqlClient.SqlDataAdapter
Friend SqlSelectCommand4 As System.Data.SqlClient.SqlCommand
Friend SqlInsertCommand4 As System.Data.SqlClient.SqlCommand
Friend SqlUpdateCommand4 As System.Data.SqlClient.SqlCommand
Friend SqlDeleteCommand4 As System.Data.SqlClient.SqlCommand Sub New(ByVal svr As String, ByVal usr As String, ByVal pwd As String) Me.SqlDataAdapter1 = New System.Data.SqlClient.SqlDataAdapter
Me.SqlConnection1 = New System.Data.SqlClient.SqlConnection
Me.SqlDataAdapter2 = New System.Data.SqlClient.SqlDataAdapter
Me.SqlSelectCommand2 = New System.Data.SqlClient.SqlCommand
Me.SqlInsertCommand2 = New System.Data.SqlClient.SqlCommand
Me.SqlUpdateCommand2 = New System.Data.SqlClient.SqlCommand
Me.SqlDeleteCommand2 = New System.Data.SqlClient.SqlCommand
Me.SqlSelectCommand1 = New System.Data.SqlClient.SqlCommand
Me.SqlInsertCommand1 = New System.Data.SqlClient.SqlCommand
Me.SqlUpdateCommand1 = New System.Data.SqlClient.SqlCommand
Me.SqlDeleteCommand1 = New System.Data.SqlClient.SqlCommand
Me.SqlDataAdapter3 = New System.Data.SqlClient.SqlDataAdapter
Me.SqlSelectCommand3 = New System.Data.SqlClient.SqlCommand
Me.SqlInsertCommand3 = New System.Data.SqlClient.SqlCommand
Me.SqlUpdateCommand3 = New System.Data.SqlClient.SqlCommand
Me.SqlDeleteCommand3 = New System.Data.SqlClient.SqlCommand
Me.SqlDataAdapter4 = New System.Data.SqlClient.SqlDataAdapter
Me.SqlSelectCommand4 = New System.Data.SqlClient.SqlCommand
Me.SqlInsertCommand4 = New System.Data.SqlClient.SqlCommand
Me.SqlUpdateCommand4 = New System.Data.SqlClient.SqlCommand
Me.SqlDeleteCommand4 = New System.Data.SqlClient.SqlCommand
'
'SqlDataAdapter1
'
Me.SqlDataAdapter1.DeleteCommand = Me.SqlDeleteCommand1
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", "Customers", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("CustomerID", "CustomerID"), New System.Data.Common.DataColumnMapping("CompanyName", "CompanyName"), New System.Data.Common.DataColumnMapping("ContactName", "ContactName"), New System.Data.Common.DataColumnMapping("ContactTitle", "ContactTitle"), New System.Data.Common.DataColumnMapping("Address", "Address"), New System.Data.Common.DataColumnMapping("City", "City"), New System.Data.Common.DataColumnMapping("Region", "Region"), New System.Data.Common.DataColumnMapping("PostalCode", "PostalCode"), New System.Data.Common.DataColumnMapping("Country", "Country"), New System.Data.Common.DataColumnMapping("Phone", "Phone"), New System.Data.Common.DataColumnMapping("Fax", "Fax")})})
Me.SqlDataAdapter1.UpdateCommand = Me.SqlUpdateCommand1
' This check is to ensure that the connection constants
' have been modified before deployment.
If svr = "" And usr = "" And pwd = "" Then
MessageBox.Show( _
"You have not modified the SQL connection settings for this sample. " & _
"Please click on the 'Settings' tab and enter your connection details. " _
)
End If
'
'SqlConnection1
'
Me.SqlConnection1.ConnectionString = _
"data source=" & svr & ";" & _
"user id=" & usr & ";" & _
"password=" & pwd & ";" & _
"initial catalog=Northwind;" & _
"persist security info=True;" & _
"packet size=4096" '
'SqlDataAdapter2
'
Me.SqlDataAdapter2.DeleteCommand = Me.SqlDeleteCommand2
Me.SqlDataAdapter2.InsertCommand = Me.SqlInsertCommand2
Me.SqlDataAdapter2.SelectCommand = Me.SqlSelectCommand2
Me.SqlDataAdapter2.TableMappings.AddRange(New System.Data.Common.DataTableMapping() {New System.Data.Common.DataTableMapping("Table", "Orders", New System.Data.Common.DataColumnMapping() {New System.Data.Common.DataColumnMapping("OrderID", "OrderID"), New System.Data.Common.DataColumnMapping("CustomerID", "CustomerID"), New System.Data.Common.DataColumnMapping("EmployeeID", "EmployeeID"), New System.Data.Common.DataColumnMapping("OrderDate", "OrderDate"), New System.Data.Common.DataColumnMapping("RequiredDate", "RequiredDate"), New System.Data.Common.DataColumnMapping("ShippedDate", "ShippedDate"), New System.Data.Common.DataColumnMapping("ShipVia", "ShipVia"), New System.Data.Common.DataColumnMapping("Freight", "Freight"), New System.Data.Common.DataColumnMapping("ShipName", "ShipName"), New System.Data.Common.DataColumnMapping("ShipAddress", "ShipAddress"), New System.Data.Common.DataColumnMapping("ShipCity", "ShipCity"), New System.Data.Common.DataColumnMapping("ShipRegion", "ShipRegion"), New System.Data.Common.DataColumnMapping("ShipPostalCode", "ShipPostalCode"), New System.Data.Common.DataColumnMapping("ShipCountry", "ShipCountry")})})
Me.SqlDataAdapter2.UpdateCommand = Me.SqlUpdateCommand2
'
'SqlSelectCommand2
'
Me.SqlSelectCommand2.CommandText = "SELECT OrderID, CustomerID, EmployeeID, OrderDate, RequiredDate, ShippedDate, Shi" & _
"pVia, Freight, ShipName, ShipAddress, ShipCity, ShipRegion, ShipPostalCode, Ship" & _
"Country FROM dbo.Orders"
Me.SqlSelectCommand2.Connection = Me.SqlConnection1
楼上的那个代码,找不到WINCE中改类的命名空间。