-1
문제점이 있습니다. 스크립트가 실행되고 String
을 빌드하고 결과를 구문 분석 할 수 있습니다. 자동으로 수락을 받으면 RedirectURL
의 값을 검색합니다.VB.Net에서 문자열 값에 URL 값 추가
내 스크립트의 빌드 버전에서 빌드 할 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
응답 해 주셔서 감사합니다.하지만 알아 냈습니다. – user3485335
그게 너였던거야? –
문자열 값의 HTML을 xml로 변환해야했습니다. Friend 재정의 함수 PostToLender (ByVal sData As String) 문자열로 반환 sData 끝 기능 – user3485335