path.asp

视频源代码 视频源代码

<%
Session("photodata")	="news"

if cpath="" or isNull(cpath) then
  call msgbox("请指定新闻的保存路径！","../category/chg.asp?categoryid="&categoryid)
end if
if csort><"news" or isNull(csort) or csort="" then
  if csort><"news" and csort><"" then
    response.redirect "../"&csort&"/default.asp?categoryid="&categoryid
    response.end
  else
    call msgbox("该分类未指定录入类型！","../category/chg.asp?categoryid="&categoryid)
  end if
end if

sql="select top 1 categorymode from category where categoryindex like '"&cindex(0)&"."&cindex(1)&"'"
rs.open sql,conn,1,1
if not rs.eof then
  cmode=rs(0)
else
  call msgbox("该分类未指定显示版面！","../category/chg.asp?categoryid="&categoryid)
end if
rs.close
%>