Private Sub getArgDict(ByRef oArgDict As Generic.Dictionary(Of String, Object))
Try
oArgDict.Add("TAGNO", Request.QueryString("TagNo"))
oArgDict.Add("rptid", Request.QueryString("rptid"))
oArgDict.Add("txtDateStart", Request.QueryString("start"))
oArgDict.Add("txtDateEnd", Request.QueryString("end"))
oArgDict.Add("TagNo", Request.QueryString("TagNo"))
If IsNothing(Request.QueryString("UniqueContent")) = True Then
oArgDict.Add("UniqueContent", Server.UrlDecode(Request.QueryString("Content")))
Else
oArgDict.Add("UniqueContent", Server.UrlDecode(Request.QueryString("UniqueContent")))
End If
oArgDict.Add("ddlLevel", Request.QueryString("ddlLevel"))
If Me.txtResp.Text <> "全部責任區" Then
oArgDict.Add("RespArea", Request.QueryString("RespArea"))
Else
oArgDict.Add("RespArea", "")
End If
Catch ex As Exception
Utility.handleException(ex)
Throw ex
End Try
End Sub
沒有留言:
張貼留言