在 OLEDB 命令语句中添加前导零

Question

我正在尝试将前导零添加到我的数据集中只有 5 个字符的主键。我们的主键是 6 个字符，前导零正在从我收到的 Excel 文件中截断。我想在下面的命令语句中添加前导零，但它无法识别“CONVERT”函数。我还是新手，不知道要使用类似的功能。非常感谢您的帮助。

("SELECT (SELECT RIGHT('000000'+CONVERT(VARCHAR,[Primary #]),6)) AS [Primary #],[Gourmet #],[Unit],FROM [" + sheetName + "]", con)

完整代码如下

Dim sqlCon As New SqlConnection("Server=MyServer;Database=MyDatabase;User Id=xxx;Password=xxxxxx")
        sqlCon.Open()


        Dim excelCmd2 As New System.Data.OleDb.OleDbCommand("SELECT (SELECT RIGHT('000000'+CONVERT(VARCHAR,[Primary #]),6)) AS [Primary #],[Gourmet #],[Unit] FROM [" + sheetName + "]", con)
        Dim excelRead As New System.Data.OleDb.OleDbDataAdapter()
        Dim dt2 As New DataTable()
        excelRead.SelectCommand = excelCmd2
        excelRead.MissingSchemaAction = MissingSchemaAction.AddWithKey
        excelRead.Fill(dt2)
        DataGridView1.AutoGenerateColumns = True
        DataGridView1.DataSource = dt2
        DataGridView1.Refresh()

Datagridview 允许我查看 Datatable 中的内容，以确保出现这些额外的零。之后，我的 excelCmd2 中的数据集在我的 sql 表中的所有列都具有相同的参数，如下所示：

Using dataRead As System.Data.OleDb.OleDbDataReader = excelCmd2.ExecuteReader()
                If dataRead.HasRows() Then
                    While dataRead.Read()
                        Dim sqlCmd As New SqlCommand
                        sqlCmd.Connection = sqlCon
                        sqlCmd.CommandType = CommandType.Text
                        sqlCmd.CommandText = sqlUpdate

                        sqlCmd.Parameters.Add("@primary", SqlDbType.VarChar).Value = Convert.ToString(dataRead.Item("Primary #"))
                        sqlCmd.Parameters.Add("@spc", SqlDbType.VarChar).Value = Convert.ToString(dataRead.Item("Gourmet #"))
                        sqlCmd.Parameters.Add("@unit", SqlDbType.VarChar).Value = Convert.ToString(dataRead.Item("Unit"))
                        sqlCmd.ExecuteScalar()
                    End While
                End If
            End Using

Answer 1

虽然它不能让您看到添加的前导零，但您可以更改行

sqlCmd.Parameters.Add("@primary", SqlDbType.VarChar).Value = Convert.ToString(dataRead.Item("Primary #")

到

sqlCmd.Parameters.Add("@primary", SqlDbType.VarChar).Value = Convert.ToString(dataRead.Item("Primary #").PadLeft(6, "0"c)

添加所需的前导零，这意味着您的 SELECT 命令被简化为

"SELECT [Primary #], [Gourmet #], [Unit] FROM [" & sheetName & "]"

（VB.NET中的字符串连接运算符是&，而不是+。）

Answer 2

使用 Padleft 添加前导零。

primaryId.padleft(6, "0")

或者如果它还没有格式化为字符串

 primaryid.tostring.padleft(6, "0")

由于您想在命令文本中使用填充版本，您可能需要创建一个临时字符串变量来保存新值，以提高代码的可读性。