在 QTP/UFT 中的多行運行時添加數據

Question

我想在運行時在多行中添加數據，但它會創建一個新列並向其中添加數據。 我用過下面的代碼。

For i = 1 To 2 Step 1
datatable.SetCurrentRow(i)  

Dim f_name,l_name
f_name=Datatable.Value("todayDate","date") + Datatable.Value("MonthName","date")
l_name=datatable.Value("This_Year","date")

Datatable.AddSheet("Emp_name").AddParameter"Emp_first_Name",f_name
Datatable.AddSheet("Emp_name").AddParameter"EMP_Last_Name",l_name

Next

Answer 1

AddParameter 每次都會添加一個新參數 - 這就是您看到重復列的原因。

有很多方法可以解決這個問題 - 一種方法是在循環之前設置表格+標題，然后在循環中添加內容。

例如：

Datatable.AddSheet("Emp_name")
Datatable.GetSheet("Emp_name").AddParameter "Emp_first_Name",""
Datatable.GetSheet("Emp_name").AddParameter "EMP_Last_Name",""

For i = 1 To 2 Step 1
    datatable.SetCurrentRow(i)  
    
    Dim f_name,l_name
    f_name="hello"
    l_name="world"
    
    Datatable.GetSheet("Emp_name").SetCurrentRow i
    Datatable.Value("Emp_first_Name", "Emp_name") = f_name
    Datatable.Value("EMP_Last_Name", "Emp_name") = l_name

Next

Output 看起來像這樣：