<%
Dim ThisID as integer = Val(Request.QueryString("Id"))
Dim Dt As DataTable = HelpData.GetData(ThisID,"H_CategoryID,H_Title,H_Text")
If Dt.Rows.Count = 0 Then
Dt.Dispose()
Response.Write("参数错误")
Exit Sub
End If
Dim HTitle,HText As String
Dim CategoryId as integer = Dt.Rows(0)("H_CategoryID")
HTitle = Dt.Rows(0)("H_Title")
HText = Dt.Rows(0)("H_Text")
Dt.Clear()
%>
{$HTitle$} - 帮助中心 - {$WebSet.Name$}
