<% Call GetBlogHint() %>
<%
Function SplitNameAndNote(s)
Dim i,j
i=InStr(s,"(")
j=InStr(s,")")
If i>0 And j>0 Then
SplitNameAndNote="
·" & Left(s,i-1) & ""
SplitNameAndNote=SplitNameAndNote & "
" & Mid(s,i+1,Len(s)-i+1-2) & "
"
Else
SplitNameAndNote="
·" & s & "
"
End If
End Function
Dim i,j
Dim tmpSng
tmpSng=LoadFromFile(BlogPath & "/c_custom.asp","utf-8")
Dim strZC_BLOG_HOST
Dim strZC_BLOG_TITLE
Dim strZC_BLOG_SUBTITLE
Dim strZC_BLOG_NAME
Dim strZC_BLOG_SUB_NAME
Dim strZC_BLOG_CSS
Dim strZC_BLOG_COPYRIGHT
Dim strZC_BLOG_MASTER
Dim strZC_BLOG_THEME
Call LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_HOST",strZC_BLOG_HOST)
Call LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_TITLE",strZC_BLOG_TITLE)
Call LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_SUBTITLE",strZC_BLOG_SUBTITLE)
Call LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_NAME",strZC_BLOG_NAME)
Call LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_SUB_NAME",strZC_BLOG_SUB_NAME)
Call LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_CSS",strZC_BLOG_CSS)
Call LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_COPYRIGHT",strZC_BLOG_COPYRIGHT)
Call LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_MASTER",strZC_BLOG_MASTER)
Call LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_THEME",strZC_BLOG_THEME)
strZC_BLOG_HOST=TransferHTML(strZC_BLOG_HOST,"[html-format]")
strZC_BLOG_TITLE=TransferHTML(strZC_BLOG_TITLE,"[html-format]")
strZC_BLOG_SUBTITLE=TransferHTML(strZC_BLOG_SUBTITLE,"[html-format]")
strZC_BLOG_NAME=TransferHTML(strZC_BLOG_NAME,"[html-format]")
strZC_BLOG_SUB_NAME=TransferHTML(strZC_BLOG_SUB_NAME,"[html-format]")
strZC_BLOG_CSS=TransferHTML(strZC_BLOG_CSS,"[html-format]")
strZC_BLOG_COPYRIGHT=TransferHTML(strZC_BLOG_COPYRIGHT,"[html-format]")
strZC_BLOG_MASTER=TransferHTML(strZC_BLOG_MASTER,"[html-format]")
strZC_BLOG_THEME=TransferHTML(strZC_BLOG_THEME,"[html-format]")
Response.Write "
"
Response.Write "
"
Response.Write "
"
Response.Write "
"
Response.Write "
"
tmpSng=LoadFromFile(BlogPath & "/c_option.asp","utf-8")
Dim strZC_BLOG_CLSID
If LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_CLSID",strZC_BLOG_CLSID) Then
strZC_BLOG_CLSID=TransferHTML(strZC_BLOG_CLSID,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG174) & " | |
"
End If
Dim strZC_TIME_ZONE
If LoadValueForSetting(tmpSng,True,"String","ZC_TIME_ZONE",strZC_TIME_ZONE) Then
strZC_TIME_ZONE=TransferHTML(strZC_TIME_ZONE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG175) & " | |
"
End If
Dim strZC_HOST_TIME_ZONE
If LoadValueForSetting(tmpSng,True,"String","ZC_HOST_TIME_ZONE",strZC_HOST_TIME_ZONE) Then
strZC_HOST_TIME_ZONE=TransferHTML(strZC_HOST_TIME_ZONE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG303) & " | |
"
End If
Dim strZC_BLOG_LANGUAGE
If LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_LANGUAGE",strZC_BLOG_LANGUAGE) Then
strZC_BLOG_LANGUAGE=TransferHTML(strZC_BLOG_LANGUAGE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG176) & " | |
"
End If
Dim strZC_UPDATE_INFO_URL
If LoadValueForSetting(tmpSng,True,"String","ZC_UPDATE_INFO_URL",strZC_UPDATE_INFO_URL) Then
strZC_UPDATE_INFO_URL=TransferHTML(strZC_UPDATE_INFO_URL,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG290) & " | |
"
End If
Dim strZC_BLOG_WEBEDIT
If LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_WEBEDIT",strZC_BLOG_WEBEDIT) Then
strZC_BLOG_WEBEDIT=TransferHTML(strZC_BLOG_WEBEDIT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG180) & " | |
"
End If
Dim strZC_UPLOAD_FILETYPE
If LoadValueForSetting(tmpSng,True,"String","ZC_UPLOAD_FILETYPE",strZC_UPLOAD_FILETYPE) Then
strZC_UPLOAD_FILETYPE=TransferHTML(strZC_UPLOAD_FILETYPE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG183) & " | |
"
End If
Dim strZC_UPLOAD_FILESIZE
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_UPLOAD_FILESIZE",strZC_UPLOAD_FILESIZE) Then
strZC_UPLOAD_FILESIZE=TransferHTML(strZC_UPLOAD_FILESIZE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG184) & " | |
"
End If
Dim strZC_UPLOAD_DIRBYMONTH
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_UPLOAD_DIRBYMONTH",strZC_UPLOAD_DIRBYMONTH) Then
strZC_UPLOAD_DIRBYMONTH=TransferHTML(strZC_UPLOAD_DIRBYMONTH,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG292) & " | |
"
End If
Dim strZC_RSS_EXPORT_WHOLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_RSS_EXPORT_WHOLE",strZC_RSS_EXPORT_WHOLE) Then
strZC_RSS_EXPORT_WHOLE=TransferHTML(strZC_RSS_EXPORT_WHOLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG226) & " | |
"
End If
Dim strZC_GUEST_REVERT_COMMENT_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_GUEST_REVERT_COMMENT_ENABLE",strZC_GUEST_REVERT_COMMENT_ENABLE) Then
strZC_GUEST_REVERT_COMMENT_ENABLE=TransferHTML(strZC_GUEST_REVERT_COMMENT_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG283) & " | |
"
End If
Dim strZC_COMMENT_TURNOFF
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_COMMENT_TURNOFF",strZC_COMMENT_TURNOFF) Then
strZC_COMMENT_TURNOFF=TransferHTML(strZC_COMMENT_TURNOFF,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG262) & " | |
"
End If
Dim strZC_TRACKBACK_TURNOFF
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_TRACKBACK_TURNOFF",strZC_TRACKBACK_TURNOFF) Then
strZC_TRACKBACK_TURNOFF=TransferHTML(strZC_TRACKBACK_TURNOFF,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG263) & " | |
"
End If
Dim strZC_GUESTBOOK_CONTENT
If LoadValueForSetting(tmpSng,True,"String","ZC_GUESTBOOK_CONTENT",strZC_GUESTBOOK_CONTENT) Then
strZC_GUESTBOOK_CONTENT=TransferHTML(strZC_GUESTBOOK_CONTENT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG276) & " | |
"
End If
Response.Write "
"
Response.Write "
"
Response.Write "
"
Response.Write "
"
Dim strZC_MSG_COUNT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_MSG_COUNT",strZC_MSG_COUNT) Then
strZC_MSG_COUNT=TransferHTML(strZC_MSG_COUNT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG187) & " | |
"
End If
Dim strZC_ARCHIVE_COUNT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_ARCHIVE_COUNT",strZC_ARCHIVE_COUNT) Then
strZC_ARCHIVE_COUNT=TransferHTML(strZC_ARCHIVE_COUNT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG188) & " | |
"
End If
Dim strZC_PREVIOUS_COUNT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_PREVIOUS_COUNT",strZC_PREVIOUS_COUNT) Then
strZC_PREVIOUS_COUNT=TransferHTML(strZC_PREVIOUS_COUNT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG189) & " | |
"
End If
Dim strZC_DISPLAY_COUNT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_DISPLAY_COUNT",strZC_DISPLAY_COUNT) Then
strZC_DISPLAY_COUNT=TransferHTML(strZC_DISPLAY_COUNT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG190) & " | |
"
End If
Dim strZC_MANAGE_COUNT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_MANAGE_COUNT",strZC_MANAGE_COUNT) Then
strZC_MANAGE_COUNT=TransferHTML(strZC_MANAGE_COUNT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG191) & " | |
"
End If
Dim strZC_RSS2_COUNT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_RSS2_COUNT",strZC_RSS2_COUNT) Then
strZC_RSS2_COUNT=TransferHTML(strZC_RSS2_COUNT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG192) & " | |
"
End If
Dim strZC_SEARCH_COUNT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_SEARCH_COUNT",strZC_SEARCH_COUNT) Then
strZC_SEARCH_COUNT=TransferHTML(strZC_SEARCH_COUNT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG193) & " | |
"
End If
Dim strZC_PAGEBAR_COUNT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_PAGEBAR_COUNT",strZC_PAGEBAR_COUNT) Then
strZC_PAGEBAR_COUNT=TransferHTML(strZC_PAGEBAR_COUNT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG194) & " | |
"
End If
Dim strZC_USE_NAVIGATE_ARTICLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_USE_NAVIGATE_ARTICLE",strZC_USE_NAVIGATE_ARTICLE) Then
strZC_USE_NAVIGATE_ARTICLE=TransferHTML(strZC_USE_NAVIGATE_ARTICLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG209) & " | |
"
End If
Dim strZC_MUTUALITY_COUNT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_MUTUALITY_COUNT",strZC_MUTUALITY_COUNT) Then
strZC_MUTUALITY_COUNT=TransferHTML(strZC_MUTUALITY_COUNT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG230) & " | |
"
End If
Dim strZC_COMMENT_REVERSE_ORDER_EXPORT
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_COMMENT_REVERSE_ORDER_EXPORT",strZC_COMMENT_REVERSE_ORDER_EXPORT) Then
strZC_COMMENT_REVERSE_ORDER_EXPORT=TransferHTML(strZC_COMMENT_REVERSE_ORDER_EXPORT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG271) & " | |
"
End If
Dim strZC_COMMENT_VERIFY_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_COMMENT_VERIFY_ENABLE",strZC_COMMENT_VERIFY_ENABLE) Then
strZC_COMMENT_VERIFY_ENABLE=TransferHTML(strZC_COMMENT_VERIFY_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG185) & " | |
"
End If
Dim strZC_VERIFYCODE_STRING
If LoadValueForSetting(tmpSng,True,"String","ZC_VERIFYCODE_STRING",strZC_VERIFYCODE_STRING) Then
strZC_VERIFYCODE_STRING=TransferHTML(strZC_VERIFYCODE_STRING,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG300) & " | |
"
End If
Dim strZC_VERIFYCODE_WIDTH
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_VERIFYCODE_WIDTH",strZC_VERIFYCODE_WIDTH) Then
strZC_VERIFYCODE_WIDTH=TransferHTML(strZC_VERIFYCODE_WIDTH,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG301) & " | |
"
End If
Dim strZC_VERIFYCODE_HEIGHT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_VERIFYCODE_HEIGHT",strZC_VERIFYCODE_HEIGHT) Then
strZC_VERIFYCODE_HEIGHT=TransferHTML(strZC_VERIFYCODE_HEIGHT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG302) & " | |
"
End If
Dim strZC_IMAGE_WIDTH
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_IMAGE_WIDTH",strZC_IMAGE_WIDTH) Then
strZC_IMAGE_WIDTH=TransferHTML(strZC_IMAGE_WIDTH,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG171) & " | |
"
End If
Dim strZC_RECENT_COMMENT_WORD_MAX
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_RECENT_COMMENT_WORD_MAX",strZC_RECENT_COMMENT_WORD_MAX) Then
strZC_RECENT_COMMENT_WORD_MAX=TransferHTML(strZC_RECENT_COMMENT_WORD_MAX,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG206) & " | |
"
End If
Dim strZC_TAGS_DISPLAY_COUNT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_TAGS_DISPLAY_COUNT",strZC_TAGS_DISPLAY_COUNT) Then
strZC_TAGS_DISPLAY_COUNT=TransferHTML(strZC_TAGS_DISPLAY_COUNT,"[html-format]")
Response.Write "| " & SplitNameAndNote(GetSettingFormNameWithDefault("ZC_MSG319","Tags Count in SliderBar")) & " | |
"
End If
Response.Write "
"
Response.Write "
"
Response.Write "
"
Response.Write "
"
Dim strZC_STATIC_TYPE
If LoadValueForSetting(tmpSng,True,"String","ZC_STATIC_TYPE",strZC_STATIC_TYPE) Then
strZC_STATIC_TYPE=TransferHTML(strZC_STATIC_TYPE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG177) & " | |
"
End If
Dim strZC_STATIC_DIRECTORY
If LoadValueForSetting(tmpSng,True,"String","ZC_STATIC_DIRECTORY",strZC_STATIC_DIRECTORY) Then
strZC_STATIC_DIRECTORY=TransferHTML(strZC_STATIC_DIRECTORY,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG178) & " | |
"
End If
Dim strZC_CUSTOM_DIRECTORY_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_CUSTOM_DIRECTORY_ENABLE",strZC_CUSTOM_DIRECTORY_ENABLE) Then
strZC_CUSTOM_DIRECTORY_ENABLE=TransferHTML(strZC_CUSTOM_DIRECTORY_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG278) & " | |
"
End If
Dim strZC_CUSTOM_DIRECTORY_REGEX
If LoadValueForSetting(tmpSng,True,"String","ZC_CUSTOM_DIRECTORY_REGEX",strZC_CUSTOM_DIRECTORY_REGEX) Then
strZC_CUSTOM_DIRECTORY_REGEX=TransferHTML(strZC_CUSTOM_DIRECTORY_REGEX,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG279) & " | |
"
End If
Dim strZC_CUSTOM_DIRECTORY_ANONYMOUS
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_CUSTOM_DIRECTORY_ANONYMOUS",strZC_CUSTOM_DIRECTORY_ANONYMOUS) Then
strZC_CUSTOM_DIRECTORY_ANONYMOUS=TransferHTML(strZC_CUSTOM_DIRECTORY_ANONYMOUS,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG280) & " | |
"
End If
Dim strZC_MOONSOFT_PLUGIN_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_MOONSOFT_PLUGIN_ENABLE",strZC_MOONSOFT_PLUGIN_ENABLE) Then
strZC_MOONSOFT_PLUGIN_ENABLE=TransferHTML(strZC_MOONSOFT_PLUGIN_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG270) & " | |
"
End If
Dim strZC_MOONSOFT_PLUGIN_REGEX
If LoadValueForSetting(tmpSng,True,"String","ZC_MOONSOFT_PLUGIN_REGEX",strZC_MOONSOFT_PLUGIN_REGEX) Then
strZC_MOONSOFT_PLUGIN_REGEX=TransferHTML(strZC_MOONSOFT_PLUGIN_REGEX,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG317) & " | |
"
End If
Dim strZC_MOONSOFT_PLUGIN_ANONYMOUS
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_MOONSOFT_PLUGIN_ANONYMOUS",strZC_MOONSOFT_PLUGIN_ANONYMOUS) Then
strZC_MOONSOFT_PLUGIN_ANONYMOUS=TransferHTML(strZC_MOONSOFT_PLUGIN_ANONYMOUS,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG318) & " | |
"
End If
Dim strZC_REBUILD_FILE_COUNT
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_REBUILD_FILE_COUNT",strZC_REBUILD_FILE_COUNT) Then
strZC_REBUILD_FILE_COUNT=TransferHTML(strZC_REBUILD_FILE_COUNT,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG181) & " | |
"
End If
Dim strZC_REBUILD_FILE_INTERVAL
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_REBUILD_FILE_INTERVAL",strZC_REBUILD_FILE_INTERVAL) Then
strZC_REBUILD_FILE_INTERVAL=TransferHTML(strZC_REBUILD_FILE_INTERVAL,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG182) & " | |
"
End If
Response.Write "
"
Response.Write "
"
Response.Write "
"
Response.Write "
"
Dim strZC_UBB_LINK_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_UBB_LINK_ENABLE",strZC_UBB_LINK_ENABLE) Then
strZC_UBB_LINK_ENABLE=TransferHTML(strZC_UBB_LINK_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG196) & " | |
"
End If
Dim strZC_UBB_FONT_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_UBB_FONT_ENABLE",strZC_UBB_FONT_ENABLE) Then
strZC_UBB_FONT_ENABLE=TransferHTML(strZC_UBB_FONT_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG197) & " | |
"
End If
Dim strZC_UBB_CODE_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_UBB_CODE_ENABLE",strZC_UBB_CODE_ENABLE) Then
strZC_UBB_CODE_ENABLE=TransferHTML(strZC_UBB_CODE_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG198) & " | |
"
End If
Dim strZC_UBB_FACE_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_UBB_FACE_ENABLE",strZC_UBB_FACE_ENABLE) Then
strZC_UBB_FACE_ENABLE=TransferHTML(strZC_UBB_FACE_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG199) & " | |
"
End If
Dim strZC_UBB_IMAGE_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_UBB_IMAGE_ENABLE",strZC_UBB_IMAGE_ENABLE) Then
strZC_UBB_IMAGE_ENABLE=TransferHTML(strZC_UBB_IMAGE_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG200) & " | |
"
End If
Dim strZC_UBB_MEDIA_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_UBB_MEDIA_ENABLE",strZC_UBB_MEDIA_ENABLE) Then
strZC_UBB_MEDIA_ENABLE=TransferHTML(strZC_UBB_MEDIA_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG201) & " | |
"
End If
Dim strZC_UBB_FLASH_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_UBB_FLASH_ENABLE",strZC_UBB_FLASH_ENABLE) Then
strZC_UBB_FLASH_ENABLE=TransferHTML(strZC_UBB_FLASH_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG202) & " | |
"
End If
Dim strZC_UBB_TYPESET_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_UBB_TYPESET_ENABLE",strZC_UBB_TYPESET_ENABLE) Then
strZC_UBB_TYPESET_ENABLE=TransferHTML(strZC_UBB_TYPESET_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG203) & " | |
"
End If
Dim strZC_UBB_AUTOLINK_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_UBB_AUTOLINK_ENABLE",strZC_UBB_AUTOLINK_ENABLE) Then
strZC_UBB_AUTOLINK_ENABLE=TransferHTML(strZC_UBB_AUTOLINK_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG204) & " | |
"
End If
'Dim strZC_UBB_AUTOKEY_ENABLE
'If LoadValueForSetting(tmpSng,True,"Boolean","ZC_UBB_AUTOKEY_ENABLE",strZC_UBB_AUTOKEY_ENABLE) Then
' strZC_UBB_AUTOKEY_ENABLE=TransferHTML(strZC_UBB_AUTOKEY_ENABLE,"[html-format]")
' Response.Write "| " & SplitNameAndNote(ZC_MSG205) & " | |
"
'End If
Dim strZC_COMMENT_NOFOLLOW_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_COMMENT_NOFOLLOW_ENABLE",strZC_COMMENT_NOFOLLOW_ENABLE) Then
strZC_COMMENT_NOFOLLOW_ENABLE=TransferHTML(strZC_COMMENT_NOFOLLOW_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG207) & " | |
"
End If
Dim strZC_JAPAN_TO_HTML
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_JAPAN_TO_HTML",strZC_JAPAN_TO_HTML) Then
strZC_JAPAN_TO_HTML=TransferHTML(strZC_JAPAN_TO_HTML,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG208) & " | |
"
End If
Dim strZC_EMOTICONS_FILENAME
If LoadValueForSetting(tmpSng,True,"String","ZC_EMOTICONS_FILENAME",strZC_EMOTICONS_FILENAME) Then
strZC_EMOTICONS_FILENAME=TransferHTML(strZC_EMOTICONS_FILENAME,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG235) & " | |
"
End If
Dim strZC_EMOTICONS_FILESIZE
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_EMOTICONS_FILESIZE",strZC_EMOTICONS_FILESIZE) Then
strZC_EMOTICONS_FILESIZE=TransferHTML(strZC_EMOTICONS_FILESIZE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG234) & " | |
"
End If
Response.Write "
"
Response.Write "
"
Response.Write "
"
Response.Write "
"
'Dim strZC_IE_DISPLAY_WAP
'If LoadValueForSetting(tmpSng,True,"Boolean","ZC_IE_DISPLAY_WAP",strZC_IE_DISPLAY_WAP) Then
' strZC_IE_DISPLAY_WAP=TransferHTML(strZC_IE_DISPLAY_WAP,"[html-format]")
' Response.Write "| " & SplitNameAndNote(ZC_MSG216) & " | |
"
'End If
Dim strZC_DISPLAY_COUNT_WAP
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_DISPLAY_COUNT_WAP",strZC_DISPLAY_COUNT_WAP) Then
strZC_DISPLAY_COUNT_WAP=TransferHTML(strZC_DISPLAY_COUNT_WAP,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG217) & " | |
"
End If
Dim strZC_COMMENT_COUNT_WAP
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_COMMENT_COUNT_WAP",strZC_COMMENT_COUNT_WAP) Then
strZC_COMMENT_COUNT_WAP=TransferHTML(strZC_COMMENT_COUNT_WAP,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG218) & " | |
"
End If
Dim strZC_PAGEBAR_COUNT_WAP
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_PAGEBAR_COUNT_WAP",strZC_PAGEBAR_COUNT_WAP) Then
strZC_PAGEBAR_COUNT_WAP=TransferHTML(strZC_PAGEBAR_COUNT_WAP,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG219) & " | |
"
End If
Dim strZC_SINGLE_SIZE_WAP
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_SINGLE_SIZE_WAP",strZC_SINGLE_SIZE_WAP) Then
strZC_SINGLE_SIZE_WAP=TransferHTML(strZC_SINGLE_SIZE_WAP,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG220) & " | |
"
End If
Dim strZC_SINGLE_PAGEBAR_COUNT_WAP
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_SINGLE_PAGEBAR_COUNT_WAP",strZC_SINGLE_PAGEBAR_COUNT_WAP) Then
strZC_SINGLE_PAGEBAR_COUNT_WAP=TransferHTML(strZC_SINGLE_PAGEBAR_COUNT_WAP,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG221) & " | |
"
End If
Dim strZC_COMMENT_PAGEBAR_COUNT_WAP
If LoadValueForSetting(tmpSng,True,"Numeric","ZC_COMMENT_PAGEBAR_COUNT_WAP",strZC_COMMENT_PAGEBAR_COUNT_WAP) Then
strZC_COMMENT_PAGEBAR_COUNT_WAP=TransferHTML(strZC_COMMENT_PAGEBAR_COUNT_WAP,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG222) & " | |
"
End If
Dim strZC_FILENAME_WAP
If LoadValueForSetting(tmpSng,True,"String","ZC_FILENAME_WAP",strZC_FILENAME_WAP) Then
strZC_FILENAME_WAP=TransferHTML(strZC_FILENAME_WAP,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG223) & " | |
"
End If
Dim strZC_WAPCOMMENT_ENABLE
If LoadValueForSetting(tmpSng,True,"Boolean","ZC_WAPCOMMENT_ENABLE",strZC_WAPCOMMENT_ENABLE) Then
strZC_WAPCOMMENT_ENABLE=TransferHTML(strZC_WAPCOMMENT_ENABLE,"[html-format]")
Response.Write "| " & SplitNameAndNote(ZC_MSG304) & " | |
"
End If
Response.Write "
"
Response.Write "
"
Dim strZC_BLOG_VERSION
If LoadValueForSetting(tmpSng,True,"String","ZC_BLOG_VERSION",strZC_BLOG_VERSION) Then
strZC_BLOG_VERSION=TransferHTML(strZC_BLOG_VERSION,"[html-format]")
Response.Write "
·"&ZC_MSG179&" :
"
End If
Response.Write "
"
%>