Hyper Content Server エラー情報
ファイル/index_pc.hc?PageName=Photo-AXIS%8EB%89e%89%EF%83%8C%83%7C%81%5B%83g%83A%83%8B%83o%83%80
C:\InetPub\www.axis-works.net\index_pc.hc
( C:\InetPub\www.axis-works.net\Photo\Report\Top.hc )
内　　容指定されたファイルが存在しないか、ファイルの読み込みができません。
追加情報SELECT * FROM "PhotoReportComments" ORDER BY "PostedAt" DESC

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html>
<head>
<!--===============================================================
フォトアルバム、メイン画面を実装するドキュメントです。
================================================================-->
    <meta http-equiv="Content-Type" content="text/html; charset=Shift_JIS" />
    <meta http-equiv="Pragma" content="no-cache" />
    <meta http-equiv="Cache-Control" content="no-cache" />
<!--!========== ページタイトル ==========-->
    <title><hctext hcaction="Value" hcoption="Value:Var('Title')">Title</hctext></title>
<!--========== スクリプト ==========-->
    <script language="JavaScript" type="text/JavaScript">
<!--
function DeleteConfirm1() {
return confirm('このフォルダは削除されます。よろしいですか？');
}
function DeleteConfirm2() {
return confirm('このアルバムは削除されます。よろしいですか？');
}
//-->
    </script>
</head>
<body bgcolor="#FFFFFF" topmargin="5" marginheight="5" hcaction="Value" hcoption="AttrName:'BGCOLOR'; Value:Var('BackColor'); AttrName:'TEXT'; Value:Var('TextColor'); AttrName:'LINK'; Value:Var('LinkColor'); AttrName:'VLINK'; Value:Var('VLinkColor'); AttrName:'ALINK'; Value:Var('ALinkColor')">
<!--!========== 共通定義部分のインクルード ==========-->
    <hcblock hcaction="Include" hcoption="File:'Global.hc'"></hcblock>
<!--!========== 背景画像が指定されていれば設定 ==========-->
    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Var('UseBackgroundImage')">
        <hcblock hcaction="Data" hcoption="DB:Var('DB1'); Table:'TextData'; FindField:'Cate1'; FindOp:'='; FindValue:'PC用サイトで使用する画像'; FindField:'Cate2'; FindOp:'='; FindValue:'トップページ背景画像'; FindField:'SEQ'; FindOp:'='; FindValue:1; FindField:'ImagePath'; FindOp:'NotNull'; FindValue:'A'">
            <hcblock hcaction="Var" hcoption="Name:'Parent'; Value:TargetTag.Parent"></hcblock>
            <hcblock hcaction="Do" hcoption="Type:'Until'; Value:Var('Parent') = Nothing Or Var('Parent').TagName = 'TD'">
                <hcblock hcaction="Call" hcoption="Call:Var('Parent') = Var('Parent').Parent"></hcblock>
            </hcblock>
            <hcblock hcaction="Call" hcoption="Call:Var('Parent').Parameter('BACKGROUND') = FieldValue('ImagePath')"></hcblock>
        </hcblock>
    </hcblock>
<!--========== スタイルの定義 ==========-->
    <style type="text/css">
        .Header {color: #111111; background: #DDDDDD; font-size:12px;} .Data {color: #222222; background: #FFFFFF; font-size:12px;} .Field {color: #222222; background: #FFFFFF; font-size:12px; font-family:ＭＳ ゴシック, monospace}
    </style>
<!--!========== スタイルにカラーを設定する ==========-->
    <hcblock hcaction="Var" hcoption="Name:'Style'; Value:TargetTag.Parent.FindByTagName('STYLE')"></hcblock>
    <hcblock hcaction="Call" hcoption="Call:Var('Style').Text = Replace(Var('Style').Text, '12px', Var('FontSize'))"></hcblock>
    <hcblock hcaction="Call" hcoption="Call:Var('Style').Text = Replace(Var('Style').Text, '#222222', Var('DataTextColor'))"></hcblock>
    <hcblock hcaction="Call" hcoption="Call:Var('Style').Text = Replace(Var('Style').Text, '#FFFFFF', Var('DataBackColor'))"></hcblock>
    <hcblock hcaction="Call" hcoption="Call:Var('Style').Text = Replace(Var('Style').Text, '#111111', Var('HeaderTextColor'))"></hcblock>
    <hcblock hcaction="Call" hcoption="Call:Var('Style').Text = Replace(Var('Style').Text, '#DDDDDD', Var('HeaderBackColor'))"></hcblock>
<!--!========== 管理モードに移行する場合のパスワードチェック ==========-->
    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(Param('Mainte')) = '1'">
        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Var('MaintePassword') <> Trim(Param('Password'))">
            <a href="index_pc.hc" hcaction="URL" hcoption="Redirect:1; ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'File'; ParamValue:'Password.hc'; ParamName:'Mainte'; ParamValue:1; ParamName:'BackTo'; ParamValue:'index_pc.hc?File=Top.hc&PageName=' & URLEncode(Param('PageName')); ParamName:'Msg'; ParamValue:'管理者パスワードを入力してください。'"></a>
        </hcblock>
    </hcblock>
<!--!========== 管理モードの移行／終了が要求されている場合、クッキーに設定 ==========-->
    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(Param('Mainte')) <> ''">
        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Param('Mainte') = '1'">
            <hcblock hcaction="Cookie" hcoption="Name:'Mainte'; Value:'1'"></hcblock>
        </hcblock>
        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Param('Mainte') = '0'">
            <hcblock hcaction="Cookie" hcoption="Name:'Mainte'; Value:''"></hcblock>
        </hcblock>
    </hcblock>
    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Var('AlwaysMainteMode')">
        <hcblock hcaction="Cookie" hcoption="Name:'Mainte'; Value:'1'"></hcblock>
    </hcblock>
<!--!========== 編集モードに移行する場合のパスワードチェック ==========-->
    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:(Val(Param('Edit')) <> 0 Or Val(Param('Delete')) <> 0) And Cookie('Mainte') = ''">
        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:InStr(Cookie('PassEdit'), Param('Parent') & ',') = 0">
            <hcblock hcaction="Data" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ID'; FindOp:'='; FindValue:Val(Param('Parent'))">
                <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(FieldValue('EditKey')) <> Trim(Param('Password'))">
                    <a href="index_pc.hc" hcaction="URL" hcoption="Redirect:1; ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'File'; ParamValue:'Password.hc'; ParamName:'Edit'; ParamValue:Param('Edit'); ParamName:'Delete'; ParamValue:Param('Delete'); ParamName:'DeleteParent'; ParamValue:Param('DeleteParent'); ParamName:'Parent'; ParamValue:Param('Parent'); ParamName:'BackTo'; ParamValue:'index_pc.hc?File=Top.hc&PageName=' & URLEncode(Param('PageName')); ParamName:'Msg'; ParamValue:IIf(FieldValue('IsFolder'), 'フォルダの編集用パスワードを入力してください', 'アルバムの編集用パスワードを入力してください')"></a>
                </hcblock>
            </hcblock>
            <hcblock hcaction="Cookie" hcoption="Name:'PassEdit'; Value:Cookie('PassEdit') & Param('Parent') & ','"></hcblock>
        </hcblock>
    </hcblock>
<!--!========== 編集モードの移行／終了が要求されている場合、クッキーに設定 ==========-->
    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(Param('Edit')) <> ''">
        <hcblock hcaction="Cookie" hcoption="Name:'Edit'; Value:Param('Edit')"></hcblock>
    </hcblock>
<!--!========== 削除アクションに対する処理 ==========-->
    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(Param('Delete')) <> ''">
<!--!========== 削除アクション - サブフォルダが存在すればエラー ==========-->
        <hcblock hcaction="Data" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ParentID'; FindOp:'='; FindValue:Param('Delete')"></hcblock>
        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:NumDatas > 0">
            <a href="index_pc.hc" hcaction="URL" hcoption="Redirect:1; ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'File'; ParamValue:'Message.hc'; ParamName:'Msg'; ParamValue:'フォルダを空にしてから削除してください。'"></a>
        </hcblock>
<!--!========== 削除アクション - フォルダ／アルバム本体と関連する写真データを削除 ==========-->
        <hcblock hcaction="Delete" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ID'; FindOp:'='; FindValue:Param('Delete')"></hcblock>
        <hcblock hcaction="Include" hcoption="File:'DeleteAllPhoto.hc'; ParamName:'AlbumID'; ParamValue:Param('Delete')"></hcblock>
<!--!========== 削除アクション - 完了したので親フォルダへ移動 ==========-->
        <a href="index_pc.hc" hcaction="URL" hcoption="Redirect:1; ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'Parent'; ParamValue:Param('DeleteParent')"></a>
    </hcblock>
<!--!========== Upアクションに対する処理 ==========-->
    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(Param('Up')) = '1'">
        <hcblock hcaction="Edit" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ParentID'; FindOp:'='; FindValue:Param('Parent'); FindField:'Sort'; FindOp:'='; FindValue:CLng(Param('Sort')) - 1; FieldName:'Sort'; FieldValue:Param('Sort')"></hcblock>
        <hcblock hcaction="Edit" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ID'; FindOp:'='; FindValue:Param('ID'); FieldName:'Sort'; FieldValue:CLng(Param('Sort')) - 1"></hcblock>
    </hcblock>
<!--!========== Downアクションに対する処理 ==========-->
    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(Param('Down')) = '1'">
        <hcblock hcaction="Edit" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ParentID'; FindOp:'='; FindValue:Param('Parent'); FindField:'Sort'; FindOp:'='; FindValue:CLng(Param('Sort')) + 1; FieldName:'Sort'; FieldValue:Param('Sort')"></hcblock>
        <hcblock hcaction="Edit" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ID'; FindOp:'='; FindValue:Param('ID'); FieldName:'Sort'; FieldValue:CLng(Param('Sort')) + 1"></hcblock>
    </hcblock>
<!--!========== Up/Downアクションが実行されれば、Sortフィールドを再ナンバリング ==========-->
    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(Param('Up')) = '1' Or Trim(Param('Down')) = '1'">
        <hcblock hcaction="Data" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ParentID'; FindOp:'='; FindValue:Val(Param('Parent')); SortField:'Sort'; SortOrder:'ASC'; Updateable:1">
            <hcblock hcaction="Call" hcoption="Call:Recordset.Fields('Sort') = Pos"></hcblock>
            <hcblock hcaction="Call" hcoption="Call:Recordset.Update"></hcblock>
        </hcblock>
    </hcblock>
<!--!========== 閲覧用パスワードチェック(編集モード、管理モードでは不要 ==========-->
    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Cookie('Mainte') <> '1' And Cookie('Edit') <> Param('Parent')">
        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:InStr(Cookie('PassView'), Param('Parent') & ',') = 0 And InStr(Cookie('PassEdit'), Param('Parent') & ',') = 0">
            <hcblock hcaction="Data" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ID'; FindOp:'='; FindValue:Val(Param('Parent'))">
                <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(FieldValue('Password')) <> Trim(Param('Password'))">
                    <a href="index_pc.hc" hcaction="URL" hcoption="Redirect:1; ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'File'; ParamValue:'Password.hc'; ParamName:'Parent'; ParamValue:Param('Parent'); ParamName:'BackTo'; ParamValue:'index_pc.hc?File=Top.hc&PageName=' & URLEncode(Param('PageName')); ParamName:'Msg'; ParamValue:IIf(FieldValue('IsFolder'), 'フォルダの閲覧用パスワードを入力してください', 'アルバムの閲覧用パスワードを入力してください')"></a>
                </hcblock>
            </hcblock>
            <hcblock hcaction="Cookie" hcoption="Name:'PassView'; Value:Cookie('PassView') & Param('Parent') & ','"></hcblock>
        </hcblock>
    </hcblock>
<!--!========== アルバムであれば、アルバムページに移動 ==========-->
    <hcblock hcaction="Data" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ID'; FindOp:'='; FindValue:Val(Param('Parent'))">
        <hcblock hcaction="If" hcoption="Type:'IfFalse'; Value:FieldValue('IsFolder')">
            <a href="index_pc.hc" hcaction="URL" hcoption="Redirect:1; ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'File'; ParamValue:'Album.hc'; ParamName:'Parent'; ParamValue:Param('Parent')"></a>
        </hcblock>
    </hcblock>
<!--!========== フォルダ情報の取得 ==========-->
    <hcblock hcaction="Var" hcoption="Name:'Parent'; Value:Val(Param('Parent'))"></hcblock>
    <hcblock hcaction="Var" hcoption="Name:'Folders'; Value:Array()"></hcblock>
    <hcblock hcaction="Do" hcoption="Type:'While'; Value:Var('Parent') <> 0">
        <hcblock hcaction="Data" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ID'; FindOp:'='; FindValue:Var('Parent')">
            <hcblock hcaction="Call" hcoption="Call:Var('Parent') = FieldValue('ParentID')"></hcblock>
            <hcblock hcaction="Call" hcoption="Call:Var('Folders').Add(FieldValue('ID'), CStr(FieldValue('Title')))"></hcblock>
        </hcblock>
        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:NumDatas = 0">
            <a href="index_pc.hc" hcaction="URL" hcoption="Redirect:1; ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'File'; ParamValue:'Message.hc'; ParamName:'Msg'; ParamValue:'無効なパラメータが指定されました。データが破損しているものと思われます。'"></a>
        </hcblock>
    </hcblock>
    <table border="0" cellpadding="0" cellspacing="0" width="600" align="center" hcaction="Value" hcoption="AttrName:'WIDTH'; Value:Var('Width'); AttrName:'BGCOLOR'; Value:Var('BackColor'); AttrName:'STYLE'; Value:'padding-left:' & Var('MarginWidth') & '%3B padding-right:' & Var('MarginWidth') & '%3B padding-top:' & Var('MarginHeight') & '%3B padding-bottom:' & Var('MarginHeight') & '%3B'"><tr><td><div hcaction="Value" hcoption="AttrName:'STYLE'; Value:'font-size:' & Var('FontSize') & '%3B color:' & Var('TextColor') & '%3B '">
<!--========== タイトル ==========-->
                    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Var('TitleStyle') <> '0' And Trim(Var('Title')) <> ''">
                        <table border="0" cellpadding="0" cellspacing="0"><tr>
                                <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Var('TitleStyle') = '1'"><td width="7" bgcolor="#FF5050" hcaction="Value" hcoption="AttrName:'BGCOLOR'; Value:Var('TitleAccentColor')"> </td></hcblock>
                                <td width="575" bgcolor="#FFFFFF" hcaction="Value" hcoption="AttrName:'BGCOLOR'; Value:Var('PageBackColor'); AttrName:'STYLE'; Value:'color:' & Var('TextColor') & '%3B font-size:' & Var('TitleFontSize') & '%3B line-height:' & CStr(CLng(Replace(Var('TitleFontSize'), 'px', '')) + 8) & 'px%3B'; AttrName:'WIDTH'; Value:Var('Width') - 7 - (CLng(Replace(Var('MarginWidth'), 'px', '')) * 2); AttrName:'ALIGN'; Value:IIf(Var('TitleStyle') = '1', 'left', IIf(Var('TitleStyle') = '2', 'right', 'center'))"> <strong><hctext hcaction="Value" hcoption="Value:Var('Title')">タイトル</hctext></strong> </td>
                                <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Var('TitleStyle') = '2'"><td width="7" bgcolor="#FF5050" hcaction="Value" hcoption="AttrName:'BGCOLOR'; Value:Var('TitleAccentColor')"> </td></hcblock></tr></table>
                        <table width="580" bgcolor="#000000" border="0" cellspacing="0" cellpadding="0" hcaction="Value" hcoption="AttrName:'WIDTH'; Value:Var('Width') - (CLng(Replace(Var('MarginWidth'), 'px', '')) * 2); AttrName:'BGCOLOR'; Value:Var('TitleLineColor')"><tr><td>
                                    <table border="0" cellspacing="0" cellpadding="0"><tr><td height="2"></td></tr></table></td></tr></table>
                        <table border="0" cellpadding="0" cellspacing="0"><tr><td height="8"></td></tr></table>
                    </hcblock>
<!--!========== 追加コメント ==========-->
                    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(Var('Comment')) <> ''">
                        <div style="margin-left:20px; line-height:18px;">
                            <hctext hcaction="Value" hcoption="Value:Var('Comment')">任意の追加コメント</hctext>
                            <table border="0" cellpadding="0" cellspacing="0"><tr><td height="8"></td></tr></table>
                        </div>
                    </hcblock>
<!--========== ヘッダHTML ==========-->
                    <hctext hcaction="Call" hcoption="Call:TargetTag.Value = Var('HeaderHTML')"></hctext>
<!--========== フォルダ情報の開始 ==========-->
                    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Val(Param('Parent')) <> 0">
                        <hcblock hcaction="Data" hcoption="DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ID'; FindOp:'='; FindValue:Val(Param('Parent'))">
                            <table width="100%" bgcolor="#000000" border="0" cellpadding="1" cellspacing="0" hcaction="Value" hcoption="AttrName:'BGCOLOR'; Value:Var('LineColor')"><tr><td>
                                        <table width="100%" bgcolor="#000000" border="0" cellpadding="3" cellspacing="1" hcaction="Value" hcoption="AttrName:'BGCOLOR'; Value:Var('LineColor')">
<!--========== 見出し ==========-->
                                            <tr>
                                                <th colspan="2" class="Header">
                                                    フォルダ情報  
                                                    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Cookie('Mainte') <> '' Or Cookie('Edit') = Param('Parent')">
                                                        <a href="index_pc.hc" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'File'; ParamValue:'EditAlbum.hc'; ParamName:'Parent'; ParamValue:Param('Parent'); ParamName:'ID'; ParamValue:FieldValue('ID'); ParamName:'IsFolder'; ParamValue:FieldValue('IsFolder')">編集</a>
                                                    </hcblock>
                                                </th>
                                            </tr>
<!--========== 名前と構成 ==========-->
                                            <tr>
                                                <td width="80" class="Header">名前と構成</td>
                                                <td class="Data">
                                                    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(Param('Parent')) = ''">
                                                        <b>トップ</b>
                                                    </hcblock>
                                                    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(Param('Parent')) <> ''">
                                                        <a href="index_pc.hc?Edit=0" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName')">トップ</a>
                                                    </hcblock>
                                                    <hcblock hcaction="For" hcoption="Begin:Var('Folders').Count - 1; End:0; Step:-1">
                                                        -
                                                        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Current = 0">
                                                            <b><hctext hcaction="Value" hcoption="Value:Var('Folders').Key(Current)">Title</hctext></b>
                                                        </hcblock>
                                                        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Current <> 0">
                                                            <a href="index_pc.hc" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'Parent'; ParamValue:Var('Folders').Item(Current); ParamName:'Edit'; ParamValue:0"><hctext hcaction="Value" hcoption="Value:Var('Folders').Key(Current)">Title</hctext></a>
                                                        </hcblock>
                                                    </hcblock>
                                                </td>
                                            </tr>
<!--========== 作成日 ==========-->
                                            <tr>
                                                <td class="Header">作成日</td>
                                                <td class="Data"><hctext hcaction="Value" hcoption="Value:FieldValue('PostedAt')"></hctext></td>
                                            </tr>
<!--========== 作成者 ==========-->
                                            <tr hcaction="If" hcoption="Type:'IfTrue'; Value:Var('EnableAuthor')">
                                                <td class="Header">作成者</td>
                                                <td class="Data"><hctext hcaction="Value" hcoption="Value:FieldValue('AuthorName')"></hctext></td>
                                            </tr>
<!--========== 解説 ==========-->
                                            <tr>
                                                <td class="Header">解説</td>
                                                <td class="Data"><hctext hcaction="Value" hcoption="Value:FieldValue('Desc')"></hctext></td>
                                            </tr>
                                        </table></td></tr></table>
                        </hcblock>
                        <table border="0" cellpadding="0" cellspacing="0"><tr><td height="8"></td></tr></table>
                    </hcblock>
<!--========== アルバム／フォルダ一覧の開始 ==========-->
                    <table width="100%" bgcolor="#000000" border="0" cellpadding="1" cellspacing="0" hcaction="Value" hcoption="AttrName:'BGCOLOR'; Value:Var('LineColor')"><tr><td>
                                <table width="100%" bgcolor="#000000" border="0" cellpadding="3" cellspacing="1" hcaction="Value" hcoption="AttrName:'BGCOLOR'; Value:Var('LineColor')">
<!--========== ヘッダ行 ==========-->
                                    <tr>
                                        <th width="30" class="Header">No.</th>
                                        <th class="Header">題名</th>
                                        <th class="Header" hcaction="If" hcoption="Type:'IfTrue'; Value:Var('EnableAuthor')">作成者</th>
                                        <th class="Header">作成日</th>
                                        <th class="Header" hcaction="If" hcoption="Type:'IfTrue'; Value:Var('EnableEditFolder') Or Var('EnableEditAlbum') Or Cookie('Mainte') <> ''"> </th>
                                    </tr>
<!--========== アルバム／フォルダ一覧行 ==========-->
                                    <tr hcaction="Data" hcoption="BlockName:'Albums' & Param('Parent'); DB:Var('DB1'); Table:Var('AlbumTableName'); FindField:'ParentID'; FindOp:'='; FindValue:Val(Param('Parent')); SortField:'Sort'; SortOrder:'ASC'; MaxInPage:10">
                                        <td class="Header" align="center" valign="bottom"><hctext hcaction="Value" hcoption="Value:Pos">No.</hctext></td>
                                        <td class="Data" valign="bottom">
                                            <a href="index_pc.hc" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'Parent'; ParamValue:FieldValue('ID')">
                                                <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:FieldValue('IsFolder')">
                                                    <img align="absmiddle" border="0" hspace="0" vspace="0" hcaction="URL" hcoption="File:Var('PagePath') & 'folder.gif'" />
                                                </hcblock>
                                                <hcblock hcaction="If" hcoption="Type:'IfFalse'; Value:FieldValue('IsFolder')">
                                                    <img align="absmiddle" border="0" hspace="0" vspace="0" hcaction="URL" hcoption="File:Var('PagePath') & 'file.gif'" />
                                                </hcblock>
                                                <hctext hcaction="Value" hcoption="Value:FieldValue('title')">title</hctext></a>
                                        </td>
                                        <td class="Data" valign="bottom" hcaction="If" hcoption="Type:'IfTrue'; Value:Var('EnableAuthor')"><hctext hcaction="Value" hcoption="Value:FieldValue('AuthorName')">AuthorName</hctext></td>
                                        <td class="Data" valign="bottom"><hctext hcaction="Value" hcoption="Value:Format(FieldValue('PostedAt'), 'yyyy年mm月dd日(aaa) hh時nn分')">yyyy年mm月dd日(aaa) hh時nn分</hctext></td>
                                        <td class="Data" hcaction="If" hcoption="Type:'IfTrue'; Value:Var('EnableEditFolder') Or Var('EnableEditAlbum') Or Cookie('Mainte') <> ''">
                                            <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Cookie('Mainte') <> '' Or Cookie('Edit') = Param('Parent') Or Val(Param('Parent')) = 0">
                                                <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Val(Param('Parent')) <> 0 Or Var('EnableEditRoot') Or Cookie('Mainte') <> ''">
                                                    <a href="Index_pc.hc" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'Up'; ParamValue:1; ParamName:'Parent'; ParamValue:Param('Parent'); ParamName:'ID'; ParamValue:FieldValue('ID'); ParamName:'Sort'; ParamValue:FieldValue('Sort')">Up</a> 
                                                    <a href="Index_pc.hc" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'Down'; ParamValue:1; ParamName:'Parent'; ParamValue:Param('Parent'); ParamName:'ID'; ParamValue:FieldValue('ID'); ParamName:'Sort'; ParamValue:FieldValue('Sort')">Down</a> 
                                                </hcblock>
                                            </hcblock>
                                            <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:(Not FieldValue('ReadOnly')) Or Cookie('Mainte') <> ''">
                                                <a href="Index_pc.hc" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'Parent'; ParamValue:FieldValue('ID'); ParamName:'Edit'; ParamValue:FieldValue('ID')">編集</a> 
                                                <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Cookie('Mainte') <> '' Or Cookie('Edit') = Param('Parent') Or Val(Param('Parent')) = 0">
                                                    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Val(Param('Parent')) <> 0 Or Var('EnableEditRoot') Or Cookie('Mainte') <> ''">
                                                        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:FieldValue('IsFolder')">
                                                            <a href="index_pc.hc" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'Parent'; ParamValue:FieldValue('ID'); ParamName:'Delete'; ParamValue:FieldValue('ID'); ParamName:'DeleteParent'; ParamValue:Param('Parent')" onclick="return DeleteConfirm1()">削除</a>
                                                        </hcblock>
                                                        <hcblock hcaction="If" hcoption="Type:'IfFalse'; Value:FieldValue('IsFolder')">
                                                            <a href="index_pc.hc" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'Parent'; ParamValue:FieldValue('ID'); ParamName:'Delete'; ParamValue:FieldValue('ID'); ParamName:'DeleteParent'; ParamValue:Param('Parent')" onclick="return DeleteConfirm2()">削除</a>
                                                        </hcblock>
                                                    </hcblock>
                                                </hcblock>
                                            </hcblock>
                                        </td>
                                    </tr>
<!--========== フッタ行 ==========-->
                                    <tr hcaction="If" hcoption="Type:'IfTrue'; Value:Cookie('Mainte') <> '' Or ( (Cookie('Edit') = Param('Parent') And Val(Param('Parent')) <> 0 Or Val(Param('Parent')) = 0 And Var('EnableEditRoot')) And (Var('EnableEditAlbum') Or Var('EnableEditAlbum')))">
                                        <td class="Header" align="center">*</td>
                                        <td class="Data" colspan="4">
                                            <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Cookie('Mainte') <> '' Or ( (Cookie('Edit') = Param('Parent') And Val(Param('Parent')) <> 0 Or Val(Param('Parent')) = 0 And Var('EnableEditRoot')) And Var('EnableEditAlbum'))">
                                                <a href="index_pc.hc" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'File'; ParamValue:'EditAlbum.hc'; ParamName:'Parent'; ParamValue:Param('Parent'); ParamName:'ID'; ParamValue:0; ParamName:'IsFolder'; ParamValue:False">アルバムの新規作成</a> 
                                            </hcblock>
                                            <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Cookie('Mainte') <> '' Or ( (Cookie('Edit') = Param('Parent') And Val(Param('Parent')) <> 0 Or Val(Param('Parent')) = 0 And Var('EnableEditRoot')) And Var('EnableEditFolder'))">
                                                <a href="index_pc.hc" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'File'; ParamValue:'EditAlbum.hc'; ParamName:'Parent'; ParamValue:Param('Parent'); ParamName:'ID'; ParamValue:0; ParamName:'IsFolder'; ParamValue:True">フォルダの新規作成</a> 
                                            </hcblock>
                                        </td>
                                    </tr>
                                </table></td></tr></table>
                    <table border="0" cellpadding="0" cellspacing="0"><tr><td height="8"></td></tr></table>
<!--========== 新着コメント一覧 ==========-->
                    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Var('EnableComment') And Val(Param('Parent')) = 0">
                        <table width="100%" bgcolor="#000000" border="0" cellpadding="1" cellspacing="0" hcaction="Value" hcoption="AttrName:'BGCOLOR'; Value:Var('LineColor')"><tr><td>
                                    <table width="100%" bgcolor="#000000" border="0" cellpadding="3" cellspacing="1" hcaction="Value" hcoption="AttrName:'BGCOLOR'; Value:Var('LineColor')">
<!--========== 見出し ==========-->
                                        <tr>
                                            <th colspan="4" class="Header">
                                                新着コメント一覧
                                            </th>
                                        </tr>
<!--==========コメント一覧 ==========-->
                                        <tr hcaction="Data" hcoption="DB:Var('DB1'); Table:Var('CommentTableName'); SortField:'PostedAt'; SortOrder:'DESC'; Max:10; MaxInPage:10">
                                            <td class="Header">
                                                <hcblock hcaction="Data" hcoption="DB:Var('DB1'); Table:Var('DataTableName'); FindField:'ID'; FindOp:'='; FindValue:FieldValue('ParentID')">
                                                    <a href="index_pc.hc" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName'); ParamName:'File'; ParamValue:'Photo.hc'; ParamName:'Parent'; ParamValue:FieldValue('AlbumID'); ParamName:'ID'; ParamValue:FieldValue('ID')">
                                                        <hctext hcaction="Value" hcoption="Value:FieldValue('Title')">タイトル</hctext>
                                                        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Trim(FieldValue('Title')) = ''">(no title)</hcblock>
                                                    </a>
                                                </hcblock>
                                            </td>
                                            <td class="Data">
                                                <hctext hcaction="Value" hcoption="Value:FieldValue('PostedAt')">投稿日</hctext>
                                            </td>
                                            <td class="Data">
                                                <hctext hcaction="Value" hcoption="Value:FieldValue('AuthorName')">投稿者</hctext>
                                            </td>
                                            <td class="Data">
                                                <hctext hcaction="Value" hcoption="Value:Left(FieldValue('Comment'), 20)">コメント</hctext>
                                            </td>
                                        </tr>
                                    </table></td></tr></table>
                    </hcblock>
                    <table border="0" cellpadding="0" cellspacing="0"><tr><td height="8"></td></tr></table>
<!--========== ページコントロールバー ==========-->
                    ****<hcblock hcaction="Include" hcoption="File:'/include/PageBar.hc'; ParamName:'FileName'; ParamValue:'index_pc.hc'; ParamName:'BlockName'; ParamValue:'Albums' & Param('Parent')" <hcblock></hcblock>****
                    <table border="0" cellpadding="0" cellspacing="0"><tr><td height="8"></td></tr></table>
<!--!========== 管理モード ==========-->
                    <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Var('ShowMainteMode')">
                        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Cookie('Mainte') = '' And Val(Param('Parent')) = 0">
                            <a href="index_pc.hc?Mainte=1" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName')">管理モード</a>
                        </hcblock>
                        <hcblock hcaction="If" hcoption="Type:'IfTrue'; Value:Cookie('Mainte') <> ''">
                            <a href="index_pc.hc?Mainte=0" hcaction="URL" hcoption="ParamName:'PageName'; ParamValue:Param('PageName')">管理モードを終了</a>
                        </hcblock>
                    </hcblock>
<!--========== フッタHTML ==========-->
                    <hctext hcaction="Call" hcoption="Call:TargetTag.Value = Var('FooterHTML')"></hctext>
                </div></td></tr></table>
</body>
</html>