<!--#include file="Cache/QvodCms.Sql.asp"-->
<!--#include file="Include/QvodCms.Lable.asp"-->
<%
Dim pid:pid=QvodCms_CLng(Request.QueryString("pid"))
Lable_Cache="Lable_Cache_Prodata"
If pid>0 Then
If Cint(Config(19))=1 and CacheObj.ChkCache(Lable_Cache) Then '直接替换缓存模板值
	Call LableObj.GetProductData(CacheObj.GetCache(Lable_Cache))
	Call LableObj.OpenQvodCmsNews(LableObj.Content)
	Call LableObj.OpenQvodCmsList(LableObj.Content)
ElseIf Cint(Config(19))=1 and CacheObj.ChkCache(Lable_Cache)=False Then 
	Call Moban_Data_Str(Config(0)&"Skin/"&Config(12)&"/"&AdminId(12)&"prod_content.html")
	Call CacheObj.SetCache(Lable_Cache,LableObj.Content)
	Call LableObj.GetProductData(LableObj.Content)
	Call LableObj.OpenQvodCmsNews(LableObj.Content)
	Call LableObj.OpenQvodCmsList(LableObj.Content)
Else
	Call Moban_Data_Str(Config(0)&"Skin/"&Config(12)&"/"&AdminId(12)&"prod_content.html")
	Call LableObj.GetProductData(LableObj.Content)
	Call LableObj.OpenQvodCmsNews(LableObj.Content)
	Call LableObj.OpenQvodCmsList(LableObj.Content)
End If
End If
Call OpenContent(LableObj.Content)
Set CacheObj = Nothing
Set LableObj = Nothing
Call CloseConn()
%>