% Dim TID,TPID As Integer Dim TPath, TName As String TID = Val(Request.QueryString("TID")) TPath = "" TName = "" Category.LineCategory.GetData(TID, TPID, TPath, TName) %>