<%
sub config_menu()
  dim filetype,file_name
  filetype=filetype&"<!--" & vbcrlf & _
	   "function web_menu()" & vbcrlf & _
	   "{" & vbcrlf & _
	   "  var m_var;" & vbcrlf & _
	   "  m_var=""<table border=0 cellspacing=0 cellpadding=0 align=center width='98%'><tr align=center height=18>"" + " & vbcrlf
  dim wdim,i
  wdim=split(web_menu,"|")
  for i=0 to ubound(wdim)
    filetype=filetype&"        ""<td><a href='"&left(wdim(i),instr(wdim(i),":")-1)&"' class='navlink'>"&right(wdim(i),len(wdim(i))-instr(wdim(i),":"))&"</a></td>"" + " & vbcrlf
  next
  erase wdim

  filetype=filetype&"        ""</tr></table>""" & vbcrlf & _
	   "  return m_var;" & vbcrlf & _
	   "}" & vbcrlf & _
	   "-->"
  file_name="style/csk3000_menu.js"
  call create_file(file_name,filetype)
end sub

sub config_file()
  dim filetype,file_name
  filetype=filetype&"<"&""&"%" & vbcrlf & _
    "'*******************************************************************"&vbcrlf&_
	"'"&vbcrlf&_
	"'                时代在线影院系统"&vbcrlf&_
	"' "&vbcrlf&_
	"'           作者：sczywj"&vbcrlf&_
	"'           QQ:   13441688、43164605"&vbcrlf&_
	"'           电邮：sczywj@163.com.com"&vbcrlf&_
	"'           网址：http://www.china-shidai.com/"&vbcrlf&_
	"' "&vbcrlf&_
	"'*******************************************************************"&vbcrlf&_
	"web_config="""&web_config&""""&vbcrlf&_
	"web_cookies="""&web_cookies&""""&vbcrlf&_
	"web_login="&web_login&vbcrlf&_
	"web_setup="""&web_setup&""""&vbcrlf&_
	"web_num="""&web_num&""""&vbcrlf&_
	"web_menu="""&web_menu&""""&vbcrlf&_
	"web_reg="""&web_reg&""""&vbcrlf&_
	"web_lst="""&web_lst&""""&vbcrlf&_
	"web_color="""&web_color&""""&vbcrlf&_
	"web_upload="""&web_upload&""""&vbcrlf&_
	"web_safety="""&web_safety&""""&vbcrlf&_
	"web_error="""&web_error&""""&vbcrlf&_
	"web_news_art="""&web_news_art&""""&vbcrlf&_
	"web_down="""&web_down&""""&vbcrlf&_
	"web_shop="""&web_shop&""""&vbcrlf&_
	"web_skins_open="&web_skins_open&vbcrlf&_
	"web_stamp="""&web_stamp&""""&vbcrlf&_
	"user_power="""&user_power&""""&vbcrlf&_
	"user_grade="""&user_grade&""""&vbcrlf&_
	"forum_type="""&forum_type&""""&vbcrlf&_
	"%"&""&">"
  file_name="include/common.asp"
  call create_file(file_name,filetype)
  
  filetype="<"&""&"%" & vbcrlf & _
        "dim web_font_family,web_font_size,top_pic,top_url,top_type,top_wh,banner_pic,banner_url,banner_type,banner_wh,scroll_head"&vbcrlf&_
	"web_font_family="""&web_font_family&""""&vbcrlf&_
	"web_font_size="""&web_font_size&""""&vbcrlf&_
	"top_pic="""&top_pic&""""&vbcrlf&_
	"top_url="""&top_url&""""&vbcrlf&_
	"top_type="""&top_type&""""&vbcrlf&_
	"top_wh="""&top_wh&""""&vbcrlf&_
	"banner_pic="""&banner_pic&""""&vbcrlf&_
	"banner_url="""&banner_url&""""&vbcrlf&_
	"banner_type="""&banner_type&""""&vbcrlf&_
	"banner_wh="""&banner_wh&""""&vbcrlf&_
	"scroll_head="""&scroll_head&""""&vbcrlf&_
	"%"&""&">"
  file_name="include/common_other.asp"
  call create_file(file_name,filetype)
end sub

sub csk3000_config_js()
  dim filetype,file_name
  filetype=filetype&"<!--" & vbcrlf & _
	   "var web_name="""&code_config(request.form("web_config_1"),3)&""";" & vbcrlf & _
	   "var web_url="""&code_config(request.form("web_config_2"),3)&""";" & vbcrlf & _
	   "var web_skin="""&code_config(request.form("web_config_5"),3)&""";" & vbcrlf & _
	   "var web_bg="""&code_config(request.form("web_config_7"),3)&""";" & vbcrlf & _
	   "var m_unit="""&code_config(request.form("web_config_8"),3)&""";" & vbcrlf & _
	   "var bg_color="""&code_config(request.form("web_color_1"),2)&""";" & vbcrlf & _
	   "var color_1="""&code_config(request.form("web_color_2"),2)&""";" & vbcrlf & _
	   "var color_2="""&code_config(request.form("web_color_3"),2)&""";" & vbcrlf & _
	   "var color_3="""&code_config(request.form("web_color_4"),2)&""";" & vbcrlf & _
	   "var color_4="""&code_config(request.form("web_color_5"),2)&""";" & vbcrlf & _
	   "var left_color="""&code_config(request.form("web_color_6"),2)&""";" & vbcrlf & _
	   "var font_color="""&code_config(request.form("web_color_7"),2)&""";" & vbcrlf & _
	   "var blue_color="""&code_config(request.form("web_color_8"),2)&""";" & vbcrlf & _
	   "var font_color2="""&code_config(request.form("web_color_9"),2)&""";" & vbcrlf & _
	   "var red_color_1="""&code_config(request.form("web_color_10"),2)&""";" & vbcrlf & _
	   "var red_color_2="""&code_config(request.form("web_color_11"),2)&""";" & vbcrlf & _
	   "var red_color_3="""&code_config(request.form("web_color_12"),2)&""";" & vbcrlf & _
	   "var font_family="""&web_font_family&""";" & vbcrlf & _
	   "var font_size="""&web_font_size&""";" & vbcrlf & _
	   "var upload_file="""&code_config(request.form("web_upload_1"),2)&""";" & vbcrlf & _
	   "var upload_type="""&code_config(request.form("web_upload_2"),2)&""";" & vbcrlf & _
	   "var upload_size="&code_config(request.form("web_upload_3"),2)&";" & vbcrlf & _
	   "var page_num="&code_num(trim(request.form("web_num_3")),10)&";"&vbcrlf&_
	   "var auto_tim="&code_num(trim(request.form("web_num_5")),10)&";"&vbcrlf&_
	   "var max_word="&code_num(trim(request.form("web_num_6")),10)&";"&vbcrlf&_
	   "var pic_w="&code_num(trim(request.form("web_num_7")),10)&";"&vbcrlf&_
	   "var pic_h="&code_num(trim(request.form("web_num_8")),10)&";"&vbcrlf&_
	   "var down_w="&code_num(trim(request.form("web_down_1")),95)&";"&vbcrlf&_
	   "var down_h="&code_num(trim(request.form("web_down_2")),75)&";"&vbcrlf&_
	   "var max_w="&code_num(trim(request.form("web_num_9")),10)&";"&vbcrlf&_
	   "var max_h="&code_num(trim(request.form("web_num_10")),10)&";"&vbcrlf&_
	   "var face_num="&code_num(trim(request.form("web_num_11")),10)&";"&vbcrlf&_
	   "var top_pic="""&top_pic&""";"&vbcrlf&_
	   "var top_url="""&top_url&""";"&vbcrlf&_
	   "var top_type="""&top_type&""";"&vbcrlf&_
	   "var top_wh="""&top_wh&""";"&vbcrlf&_
	   "var banner_pic="""&banner_pic&""";"&vbcrlf&_
	   "var banner_url="""&banner_url&""";"&vbcrlf&_
	   "var banner_type="""&banner_type&""";"&vbcrlf&_
	   "var banner_wh="""&banner_wh&""";"&vbcrlf&_
	   "var head_scroll="""&scroll_head&""";"&vbcrlf&_
	   "var openview=true;"&vbcrlf&_
	   "var web_wid="""&code_config(request.form("web_config_10"),2)&""";"&vbcrlf&_
	   "-->"
  file_name="include/csk3000_config.js"
  call create_file(file_name,filetype)
end sub

sub web_user_js()
  dim filetype,file_name
  file_name="style/web_user.js"
  filetype="document.write("""&replace(user_power_type(0),"""","\""")&""");"
  call create_file(file_name,filetype)
end sub

sub forum_label_js
  dim filetype,file_name,ui,udim
  file_name="style/forum_label.js"
  filetype="document.write("""
  udim=split(forum_type,"|")
  for ui=0 to ubound(udim)
    filetype=filetype&"&nbsp;<img src='images/forum/label_"&ui+1&".gif' title='无新贴' border=0 align=absmiddle>&nbsp;&nbsp;<img src='images/forum/label_"&ui+1&"n.gif' title='有新贴' border=0 align=absmiddle>&nbsp;"&right(udim(ui),len(udim(ui))-instr(udim(ui),":"))&"&nbsp;"
    'filetype=filetype&"&nbsp;<img src='images/small/label_"&ui+1&".gif' border=0 align=absmiddle>&nbsp;"&right(udim(ui),len(udim(ui))-instr(udim(ui),":"))&"&nbsp;"
  next
  erase udim
  filetype=filetype&""");"
  call create_file(file_name,filetype)
end sub

sub config_css()
  dim filetype,file_name
  file_name="images/csk3000.css"
  filetype="<!--" & _
	   vbcrlf&"body,p,td { font-family:"&web_font_family&"; font-size:"&web_font_size&"; color:"&code_config(request.form("web_color_7"),2)&" }" & _
	   vbcrlf&"body { cursor: url('images/csk3000.ani');" & _
	   vbcrlf&"scrollbar-face-color: #EEEEEE;" & _
	   vbcrlf&"scrollbar-highlight-color: #FFFFFF;" & _
	   vbcrlf&"scrollbar-shadow-color: #DEE3E7;" & _
	   vbcrlf&"scrollbar-3dlight-color: #D1D7DC;" & _
	   vbcrlf&"scrollbar-arrow-color:  "&code_config(request.form("web_color_2"),2)&";" & _
	   vbcrlf&"scrollbar-track-color: #ededed;" & _
	   vbcrlf&"scrollbar-darkshadow-color: "&code_config(request.form("web_color_3"),2)&"; }" & _
	   vbcrlf&"" & _
	   vbcrlf&"INPUT { BORDER-TOP-WIDTH: 1px; PADDING-RIGHT: 1px; PADDING-LEFT: 1px;" & _
	   vbcrlf&" BORDER-LEFT-WIDTH: 1px; BORDER-BOTTOM-WIDTH: 1px; BORDER-RIGHT-WIDTH: 1px;" & _
	   vbcrlf&" PADDING-BOTTOM: 1px; PADDING-TOP: 1px; HEIGHT: 18px;" & _
	   vbcrlf&" BORDER-LEFT-COLOR: #c0c0c0; BORDER-BOTTOM-COLOR: #c0c0c0;" & _
	   vbcrlf&" BORDER-TOP-COLOR: #c0c0c0; BORDER-RIGHT-COLOR: #c0c0c0;" & _
	   vbcrlf&" background-color: "&code_config(request.form("web_color_1"),2)&"; CURSOR: HAND;" & _
	   vbcrlf&" FONT-SIZE: "&web_font_size&"; font-family: "&web_font_family&"; COLOR: "&code_config(request.form("web_color_7"),2)&";" & _
	   vbcrlf&"}" & _
	   vbcrlf&"textarea { border-width: 1; border-color: #c0c0c0; background-color: "&code_config(request.form("web_color_1"),2)&";" & _
	   vbcrlf&" font-family: "&web_font_family&"; font-size: "&web_font_size&"; CURSOR: HAND; COLOR: "&code_config(request.form("web_color_7"),2)&";" & _
	   vbcrlf&"}" & _
	   vbcrlf&"select { border-width: 1; border-color: #c0c0c0; background-color: "&code_config(request.form("web_color_1"),2)&";" & _
	   vbcrlf&" font-family: "&web_font_family&"; font-size:"&web_font_size&"; CURSOR: HAND; COLOR: "&code_config(request.form("web_color_7"),2)&";" & _
	   vbcrlf&"}" & _
	   vbcrlf&".bg_1 { background-color: "&code_config(request.form("web_color_1"),2)&" }" & _
	   vbcrlf&".bg_2 { background-color: "&code_config(request.form("web_color_6"),4)&" }" & _
	   vbcrlf&".bg_3 { background-color: "&code_config(request.form("web_color_5"),5)&" }" & _
	   vbcrlf&".table { width:98%; border: 1px; background-color: "&code_config(request.form("web_color_3"),2)&"; }" & _
	   vbcrlf&".table0 { width:100%; border: 1px; background-color: "&code_config(request.form("web_color_3"),2)&"; }" & _
	   vbcrlf&".td { background-image: url('images/bg_td.gif'); color: "&code_config(request.form("web_color_1"),2)&"; height: 20px; font-weight:bold; }" & _
	   vbcrlf&".timtd { font-size:Arial, Verdana, Helvetica, sans-serif, 宋体 }" & _
	   vbcrlf&".tims { color: "&code_config(request.form("web_color_9"),2)&"; font-size:7pt; }" & _
	   vbcrlf&".htd { line-height:150% }" & _
	   vbcrlf&".btd { font-weight:bold }" & _
	   vbcrlf&".bw { WORD-WRAP: break-word }" & _
	   vbcrlf&".tf { TABLE-LAYOUT: fixed }" & _
	   vbcrlf&".red { color:"&code_config(request.form("web_color_10"),2)&" }" & _
	   vbcrlf&".red_2 { color:"&code_config(request.form("web_color_11"),2)&" }" & _
	   vbcrlf&".red_3 { color:"&code_config(request.form("web_color_12"),2)&" }" & _
	   vbcrlf&".end { color:"&code_config(request.form("web_color_1"),2)&" }" & _
	   vbcrlf&".blue { color: "&code_config(request.form("web_color_8"),2)&"; }" & _
	   vbcrlf&".gray { color: "&code_config(request.form("web_color_9"),2)&"; }" & _
	   vbcrlf&"a { COLOR: "&code_config(request.form("web_color_3"),2)&"; TEXT-DECORATION: none }" & _
	   vbcrlf&"a:hover { COLOR: "&code_config(request.form("web_color_10"),2)&"; TEXT-DECORATION: underline }" & _
	   vbcrlf&"a.menu { COLOR: "&code_config(request.form("web_color_1"),2)&"; TEXT-DECORATION: none }" & _
	   vbcrlf&"a.menu:hover { COLOR: "&code_config(request.form("web_color_12"),2)&"; TEXT-DECORATION: none }" & _
	   vbcrlf&"-->"
  call create_file(file_name,filetype)
end sub

function user_power_type(ptt)
  dim pdim,pn:user_power_type="网站用户图例："
  pdim=split(user_power,"|")
  for pn=0 to ubound(pdim)
    user_power_type=user_power_type&"&nbsp;"&img_small("icon_"&left(pdim(pn),instr(pdim(pn),":")-1))&right(pdim(pn),len(pdim(pn))-instr(pdim(pn),":"))
  next
  erase pdim
  user_power_type=user_power_type&"&nbsp;&nbsp;"&img_small("icon_other")&"游客"
end function
%>