Hello all;
I Want to pass parameter to Xml,
this is my xml
strBuildxml &= "<?xml version='1.0'?>" & Microsoft.VisualBasic.ControlChars.NewLine
'===============================
'build <InfoLinkDocument>
strBuildxml &= "<InfoLinkDocument>" & Microsoft.VisualBasic.ControlChars.NewLine
'===============================
' build <AccessRequest>
strBuildxml &= "<AccessRequest>" & Microsoft.VisualBasic.ControlChars.NewLine
strBuildxml &= "<DocumentType>" & txtDocumentType.Text & "</DocumentType> " & Microsoft.VisualBasic.ControlChars.NewLine
strBuildxml &= "<EntityID>" & txtEntityID.Text & "</EntityID> " & Microsoft.VisualBasic.ControlChars.NewLine
strBuildxml &= "<Version>" & txtVersion.Text & "</Version> " & Microsoft.VisualBasic.ControlChars.NewLine
'If txtTimeStamp.Text = " '09:00 am' > Now.Hour < ' 16:00 pm'" Then
strBuildxml &= "<TimeStamp>" & txtTimeStamp.Text & "</TimeStamp> " & Microsoft.VisualBasic.ControlChars.NewLine
'Else
' MsgBox("The Pickup Time not correct")
'End If
strBuildxml &= "<Reference1>" & txtReference1.Text & "</Reference1> " & Microsoft.VisualBasic.ControlChars.NewLine
If txtReference2.Text <> "" Then
strBuildxml &= "<Reference2>" & txtReference2.Text & "</Reference2> " & Microsoft.VisualBasic.ControlChars.NewLine
End If
If txtReference3.Text <> "" Then
strBuildxml &= "<Reference3>" & txtReference3.Text & "</Reference3> " & Microsoft.VisualBasic.ControlChars.NewLine
End If
If txtReference4.Text <> "" Then
strBuildxml &= "<Reference4>" & txtReference4.Text & "</Reference4> " & Microsoft.VisualBasic.ControlChars.NewLine
End If
If txtReference5.Text <> "" Then
strBuildxml &= "<Reference5>" & txtReference5.Text & "</Reference5> " & Microsoft.VisualBasic.ControlChars.NewLine
End If
strBuildxml &= "<ReplyEmailAddress>" & txtReplyEmailAddress.Text & "</ReplyEmailAddress> " & Microsoft.VisualBasic.ControlChars.NewLine
strBuildxml &= "<NotifyOnSuccess>" & ddlNotifyOnSuccess.SelectedValue.ToString & "</NotifyOnSuccess> " & Microsoft.VisualBasic.ControlChars.NewLine
'Close <AccessRequest>
'===============================
strBuildxml &= "</AccessRequest>" & Microsoft.VisualBasic.ControlChars.NewLine