<%
'**************************************
'* 最后更新 2012-05-20 by 56770.kingdge 
'* Copyright www.56770.com             
'**************************************
Dim page,news_type,newstype,sql,id
If show_html = 0 Or (show_html = 1 And InStr(LCase(Request.ServerVariables("URL")),"/help") > 0) Then 
        page = request("page")
		If Config_Lebi_Eshop(16) = 0 And InStr(LCase(Request.ServerVariables("URL")),"/help") = 0 Then 
				id = request("news_type")
		Else 
				id = request("id")
		End If 
End If 
id = checknum(id,0)
page = checknum(page,1)
If id <> 0 Then 
        sql = "select newstype"& LangTxt &" from [Lebi_helptype] where type_id="&id&""
        Set rs = conn.execute(sql)
        If Not rs.eof then
                newstype = rs(0)
        End if
        rs.close:set rs=Nothing
		Showpath = "<a href='"& Eshop_url & LangPath &"'>"& Lebi_word(0) &"</a> → <a href='"& Eshop_url & url_8 &"'>"& Lebi_word(19) &"</a> → "& newstype &""
Else
        newstype = Lebi_word(22)
		Showpath = "<a href='"& Eshop_url & LangPath &"'>"& Lebi_word(0) &"</a> → <a href='"& Eshop_url & url_8 &"'>"& Lebi_word(19) &"</a> → "& Lebi_word(22) &""
End If
strwebtitle= newstype &" - "
%>