📄 mysaledataset1.designer.vb
字号:
Inherits System.ComponentModel.Component
Private WithEvents _adapter As System.Data.SqlClient.SqlDataAdapter
Private _connection As System.Data.SqlClient.SqlConnection
Private _commandCollection() As System.Data.SqlClient.SqlCommand
Private _clearBeforeFill As Boolean
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Sub New()
MyBase.New
Me.ClearBeforeFill = true
End Sub
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private ReadOnly Property Adapter() As System.Data.SqlClient.SqlDataAdapter
Get
If (Me._adapter Is Nothing) Then
Me.InitAdapter
End If
Return Me._adapter
End Get
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Friend Property Connection() As System.Data.SqlClient.SqlConnection
Get
If (Me._connection Is Nothing) Then
Me.InitConnection
End If
Return Me._connection
End Get
Set
Me._connection = value
If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
Me.Adapter.InsertCommand.Connection = value
End If
If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
Me.Adapter.DeleteCommand.Connection = value
End If
If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
Me.Adapter.UpdateCommand.Connection = value
End If
Dim i As Integer = 0
Do While (i < Me.CommandCollection.Length)
If (Not (Me.CommandCollection(i)) Is Nothing) Then
CType(Me.CommandCollection(i),System.Data.SqlClient.SqlCommand).Connection = value
End If
i = (i + 1)
Loop
End Set
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Protected ReadOnly Property CommandCollection() As System.Data.SqlClient.SqlCommand()
Get
If (Me._commandCollection Is Nothing) Then
Me.InitCommandCollection
End If
Return Me._commandCollection
End Get
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Public Property ClearBeforeFill() As Boolean
Get
Return Me._clearBeforeFill
End Get
Set
Me._clearBeforeFill = value
End Set
End Property
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub InitAdapter()
Me._adapter = New System.Data.SqlClient.SqlDataAdapter
Dim tableMapping As System.Data.Common.DataTableMapping = New System.Data.Common.DataTableMapping
tableMapping.SourceTable = "Table"
tableMapping.DataSetTable = "公司信息"
tableMapping.ColumnMappings.Add("公司名称", "公司名称")
tableMapping.ColumnMappings.Add("法人代表", "法人代表")
tableMapping.ColumnMappings.Add("公司地址", "公司地址")
tableMapping.ColumnMappings.Add("服务电话", "服务电话")
tableMapping.ColumnMappings.Add("邮政编码", "邮政编码")
tableMapping.ColumnMappings.Add("电子邮件", "电子邮件")
tableMapping.ColumnMappings.Add("公司网站", "公司网站")
tableMapping.ColumnMappings.Add("管理系统背景照片", "管理系统背景照片")
tableMapping.ColumnMappings.Add("管理系统显示名称", "管理系统显示名称")
tableMapping.ColumnMappings.Add("显示优先级", "显示优先级")
Me._adapter.TableMappings.Add(tableMapping)
Me._adapter.DeleteCommand = New System.Data.SqlClient.SqlCommand
Me._adapter.DeleteCommand.Connection = Me.Connection
Me._adapter.DeleteCommand.CommandText = "DELETE FROM [dbo].[公司信息] WHERE (([公司名称] = @Original_公司名称) AND ((@IsNull_法人代表 = 1 "& _
"AND [法人代表] IS NULL) OR ([法人代表] = @Original_法人代表)) AND ((@IsNull_公司地址 = 1 AND [公司"& _
"地址] IS NULL) OR ([公司地址] = @Original_公司地址)) AND ((@IsNull_服务电话 = 1 AND [服务电话] IS "& _
"NULL) OR ([服务电话] = @Original_服务电话)) AND ((@IsNull_邮政编码 = 1 AND [邮政编码] IS NULL) O"& _
"R ([邮政编码] = @Original_邮政编码)) AND ((@IsNull_电子邮件 = 1 AND [电子邮件] IS NULL) OR ([电子邮"& _
"件] = @Original_电子邮件)) AND ((@IsNull_公司网站 = 1 AND [公司网站] IS NULL) OR ([公司网站] = @O"& _
"riginal_公司网站)) AND ((@IsNull_管理系统背景照片 = 1 AND [管理系统背景照片] IS NULL) OR ([管理系统背景照片]"& _
" = @Original_管理系统背景照片)) AND ((@IsNull_管理系统显示名称 = 1 AND [管理系统显示名称] IS NULL) OR (["& _
"管理系统显示名称] = @Original_管理系统显示名称)) AND ((@IsNull_显示优先级 = 1 AND [显示优先级] IS NULL) OR"& _
" ([显示优先级] = @Original_显示优先级)))"
Me._adapter.DeleteCommand.CommandType = System.Data.CommandType.Text
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_公司名称", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司名称", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_法人代表", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "法人代表", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_法人代表", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "法人代表", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_公司地址", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "公司地址", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_公司地址", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司地址", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_服务电话", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "服务电话", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_服务电话", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "服务电话", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_邮政编码", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "邮政编码", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_邮政编码", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "邮政编码", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_电子邮件", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "电子邮件", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_电子邮件", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "电子邮件", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_公司网站", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "公司网站", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_公司网站", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司网站", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_管理系统背景照片", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统背景照片", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_管理系统背景照片", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统背景照片", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_管理系统显示名称", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统显示名称", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_管理系统显示名称", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统显示名称", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_显示优先级", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "显示优先级", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.DeleteCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_显示优先级", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "显示优先级", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.InsertCommand = New System.Data.SqlClient.SqlCommand
Me._adapter.InsertCommand.Connection = Me.Connection
Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[公司信息] ([公司名称], [法人代表], [公司地址], [服务电话], [邮政编码], [电子邮件], [公司网站],"& _
" [管理系统背景照片], [管理系统显示名称], [显示优先级]) VALUES (@公司名称, @法人代表, @公司地址, @服务电话, @邮政编码, @电子"& _
"邮件, @公司网站, @管理系统背景照片, @管理系统显示名称, @显示优先级);"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT 公司名称, 法人代表, 公司地址, 服务电话, 邮政编码, "& _
"电子邮件, 公司网站, 管理系统背景照片, 管理系统显示名称, 显示优先级 FROM 公司信息 WHERE (公司名称 = @公司名称)"
Me._adapter.InsertCommand.CommandType = System.Data.CommandType.Text
Me._adapter.InsertCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@公司名称", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司名称", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@法人代表", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "法人代表", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@公司地址", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司地址", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@服务电话", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "服务电话", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@邮政编码", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "邮政编码", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@电子邮件", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "电子邮件", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@公司网站", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司网站", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@管理系统背景照片", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统背景照片", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@管理系统显示名称", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统显示名称", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.InsertCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@显示优先级", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "显示优先级", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand = New System.Data.SqlClient.SqlCommand
Me._adapter.UpdateCommand.Connection = Me.Connection
Me._adapter.UpdateCommand.CommandText = "UPDATE [dbo].[公司信息] SET [公司名称] = @公司名称, [法人代表] = @法人代表, [公司地址] = @公司地址, [服务电话] = "& _
"@服务电话, [邮政编码] = @邮政编码, [电子邮件] = @电子邮件, [公司网站] = @公司网站, [管理系统背景照片] = @管理系统背景照片, ["& _
"管理系统显示名称] = @管理系统显示名称, [显示优先级] = @显示优先级 WHERE (([公司名称] = @Original_公司名称) AND ((@"& _
"IsNull_法人代表 = 1 AND [法人代表] IS NULL) OR ([法人代表] = @Original_法人代表)) AND ((@IsNull_"& _
"公司地址 = 1 AND [公司地址] IS NULL) OR ([公司地址] = @Original_公司地址)) AND ((@IsNull_服务电话 = "& _
"1 AND [服务电话] IS NULL) OR ([服务电话] = @Original_服务电话)) AND ((@IsNull_邮政编码 = 1 AND ["& _
"邮政编码] IS NULL) OR ([邮政编码] = @Original_邮政编码)) AND ((@IsNull_电子邮件 = 1 AND [电子邮件] I"& _
"S NULL) OR ([电子邮件] = @Original_电子邮件)) AND ((@IsNull_公司网站 = 1 AND [公司网站] IS NULL)"& _
" OR ([公司网站] = @Original_公司网站)) AND ((@IsNull_管理系统背景照片 = 1 AND [管理系统背景照片] IS NULL"& _
") OR ([管理系统背景照片] = @Original_管理系统背景照片)) AND ((@IsNull_管理系统显示名称 = 1 AND [管理系统显示名称"& _
"] IS NULL) OR ([管理系统显示名称] = @Original_管理系统显示名称)) AND ((@IsNull_显示优先级 = 1 AND [显示"& _
"优先级] IS NULL) OR ([显示优先级] = @Original_显示优先级)));"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT 公司名称, 法人代表, 公司地址, 服务电话, "& _
"邮政编码, 电子邮件, 公司网站, 管理系统背景照片, 管理系统显示名称, 显示优先级 FROM 公司信息 WHERE (公司名称 = @公司名称)"
Me._adapter.UpdateCommand.CommandType = System.Data.CommandType.Text
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@公司名称", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司名称", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@法人代表", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "法人代表", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@公司地址", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司地址", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@服务电话", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "服务电话", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@邮政编码", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "邮政编码", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@电子邮件", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "电子邮件", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@公司网站", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司网站", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@管理系统背景照片", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统背景照片", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@管理系统显示名称", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统显示名称", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@显示优先级", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "显示优先级", System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_公司名称", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司名称", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_法人代表", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "法人代表", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_法人代表", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "法人代表", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_公司地址", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "公司地址", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_公司地址", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司地址", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_服务电话", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "服务电话", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_服务电话", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "服务电话", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_邮政编码", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "邮政编码", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_邮政编码", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "邮政编码", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_电子邮件", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "电子邮件", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_电子邮件", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "电子邮件", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_公司网站", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "公司网站", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_公司网站", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "公司网站", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_管理系统背景照片", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统背景照片", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_管理系统背景照片", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统背景照片", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_管理系统显示名称", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统显示名称", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_管理系统显示名称", System.Data.SqlDbType.NVarChar, 0, System.Data.ParameterDirection.Input, 0, 0, "管理系统显示名称", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@IsNull_显示优先级", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "显示优先级", System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
Me._adapter.UpdateCommand.Parameters.Add(New System.Data.SqlClient.SqlParameter("@Original_显示优先级", System.Data.SqlDbType.Int, 0, System.Data.ParameterDirection.Input, 0, 0, "显示优先级", System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
End Sub
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub InitConnection()
Me._connection = New System.Data.SqlClient.SqlConnection
Me._connection.ConnectionString = Global.商品销售管理系统.My.MySettings.Default.MySaleConnectionString
End Sub
<System.Diagnostics.DebuggerNonUserCodeAttribute()> _
Private Sub InitCommandCollection()
Me._commandCollection = New System.Data.SqlClient.SqlCommand(0) {}
Me._commandCollection(0) = New System.Data.SqlClient.SqlCommand
Me._commandCollection(0).Connection = Me.Connection
Me._commandCollection(0).CommandText = "SELECT 公司名称, 法人代表, 公司地址, 服务电话, 邮政编码, 电子邮件, 公司网站, 管理系统背景照片, 管理系统显示名称, 显示优先级 FROM d"& _
"bo.公司信息"
Me._commandCollection(0).CommandType = System.Data.CommandType.Text
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -