% @ LANGUAGE="VBSCRIPT" %>
<%
Option Explicit
Dim background, Style, frameHeight, pagePicture, pageText, pageType, pagewords, ranWizard, strpageType, Theme
%>
<% call Template_ranWizardCheck
If request("REQUEST_METHOD") = "POST" Then
call variableAssignments
If request.Form("contents") Then
%>
<%
End If
myinfo.ranWizard = -1
End If
If request("debug") = "true" Then
myinfo.ranWizard = -1
ElseIf request("debug") = "false" Then
myinfo.ranWizard = 0
End If
If request.Form("addLink.x") <> "" Then 'add links
call Template_addLink
End If
If request.Form("removeLink.x") <> "" Then 'remove links
call Template_removeLink
End If
%>
PWS クイック セットアップ
<% call styleSheet %>
フォーム上の情報を追加または変更して、ホーム ページのレイアウトを個人用に設定します。
<%
response.write "ヘルプ: "
If myinfo.ranWizard = "-1" Then
response.write ""
End If
%>
|
|