我遇到了问题。
该脚本运行并构建String
并可以解析结果,它会自动接收,然后搜索RedirectURL
的值。
如何在我的脚本的构建版本中添加要构建的URL值。
Friend Overrides Function Filter() As String
Dim sb As New StringBuilder()
Return sb.ToString() '' Returning an empty string allows the applicant to be passed to the lender; otherwise the applicant is not sent
If app.BankAccount = String.Empty Then
sb.Append("Bank Account must be present;")
End If
If app.BankSortCode = String.Empty Then
sb.Append("Sort Code must be present;")
End If
If app.LoanAmount = String.Empty Then
sb.Append("Loan Amount must be present;")
End If
End Function
Friend Overrides Function Build() As String
Dim sb As New StringBuilder()
sb.AppendLine("&first_name=" & app.FirstName)
sb.AppendLine("&surname=" & app.LastName)
sb.AppendLine("&dob=" & app.DOB.ToString)
sb.AppendLine("&email=" & app.Email)
sb.AppendLine("&home_phone=" & app.LandPhone)
sb.AppendLine("&mobile_phone=" & app.MobilePhone)
sb.AppendLine("&postcode=" & app.PostCode)
sb.AppendLine("&affid=" & app.affID)
sb.AppendLine("&subid=" & lendertier.Credential1)
sb.AppendLine("&leadid=" & lendertier.Credential2)
sb.AppendLine("&bk_no=" & app.BankAccount)
sb.AppendLine("&bk_s=" & app.BankSortCode)
sb.AppendLine("&ar=" & app.LoanAmount.ToString)
Return sb.ToString()
End Function
Friend Overrides Function ParseResult(ByVal sResult As String) As Boolean
app.Outcome.RedirectURL = sResult
AcceptLead()
Return True
End Function
答案 0 :(得分:0)
这个问题不是很明确,但我会试一试......
我认为您在检索应用程序版本号并将其包含在paramaterse之后,在这种情况下您将需要以下内容: -
Dim versionNumber As Version
versionNumber = Assembly.GetExecutingAssembly().GetName().Version
您必须导入System.Reflection才能工作。