Question

我正在尝试将每行存储到我的存储过程参数中。我的记录集有6列，我使用记录集来检索这些列的值并将它们添加到存储过程中。我被困在下面无法检索我的记录集的列值你认为我在下面做的是对的，还是有其他办法从记录集中检索列值

If not rs.EOF and rs.BOF Then               
                For Each col in rs.Fields               
                    rsAdd(Replace(col.Name,"_","")) = col.Value
                    cmd.Parameters("@id") = col.Name(Replace(col.Name,"_","")).value
                Next            
        End If

更新：这是我在Josh建议我将所有值硬编码为参数后所做的事情。

这不是执行存储过程。但我知道我的存储过程工作正如我在SSMS中使用样本数据执行它。

记录集有数据，所以我想代码中有问题。

Set rs = GetRecordSet("C:\upload\new\" & TheNewFileName2)
    'Response.Write "No Errors"
    Set cn = Server.CreateObject("ADODB.Connection")
    cn.ConnectionString="DSN=ABCD"
    cn.Open
    Set cmd = Server.CreateObject("ADODB.Command")
    cmd.ActiveConnection = cn
    cmd.CommandType = 4     
    cmd.CommandText = "[dbo].[uspSearchData]"       


    While not rs.EOF and rs.BOF 

                cmd.Parameters.Append cmd.CreateParameter("@id",3,1,rs("Merchant_ID"))
                cmd.Parameters.Append cmd.CreateParameter("@name",200,1,255,rs("Name"))
                cmd.Parameters.Append cmd.CreateParameter("@address",200,1,255,rs("Address"))
                cmd.Parameters.Append cmd.CreateParameter("@city",200,1,255,rs("City"))
                cmd.Parameters.Append cmd.CreateParameter("@state",200,1,255,rs("State"))
                cmd.Parameters.Append cmd.CreateParameter("@zip",200,1,255,rs("Zip"))
                cmd.Parameters.Append cmd.CreateParameter("@country",200,1,255,rs("Country")) 
                cmd.Parameters.Append cmd.CreateParameter("@phone",200,1,255,rs("Phone")) 
                cmd.Parameters.Append cmd.CreateParameter("@emailid",200,1,255,rs("Web_Address")) 
                cmd.Parameters.Append cmd.CreateParameter("@awardlevel",200,1,255,rs("Award_Level")) 
                cmd.Parameters.Append cmd.CreateParameter("@awardvalue",200,1,255,rs("Award_Value"))
                cmd.Parameters.Append cmd.CreateParameter("@awarddays",200,1,255,rs("Award_Days"))
                cmd.Parameters.Append cmd.CreateParameter("@bestlogo",200,1,255,rs("BestLogo")) 
                cmd.Parameters.Append cmd.CreateParameter("@twitter",200,1,255,rs("Twitter"))
                cmd.Parameters.Append cmd.CreateParameter("@facebook",200,1,255,rs("Facebook")) 
                cmd.Parameters.Append cmd.CreateParameter("@electronicprogram",200,1,255,rs("Electronic_Program"))

                cmd.Execute
                rs.MoveNext         
    Wend

    rs.Close
    Set cmd = Nothing
    Set rs = Nothing

    cn.Close
    Set cn = Nothing

Answer 1

你认为我在下面做的是对的，还是有其他办法从记录集
中检索列值

如果你只有6列，那么你最好只需要对每一行进行硬编码，而不是使用循环遍历每一列。如果它们都具有相同的数据类型和大小，那么循环遍历每一列

Answer 2

我明白了。我正在检查文件结束，如果不是EOF则进入循环内部。但也有BOF，我没有检查＆＃34;不是BOF＆＃34;这就是原因，值没有插入数据库。我的最终工作代码如下。

using Xamarin.Forms;

将记录集值添加到存储过程参数 - 经典ASP

2 个答案: