テーブルの加工。
＜表スタイル=TABLE-LAYOUT: 固定幅=200 ボーダー=0 セルスペース=0 セルパディング=7 bgcolor=#f7f7f7＞
＜tr＞
<td スタイル=左: 0px; 幅: 100%; ワードラップ: ブレークワード>
dffadfdaqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqqsfdffad
fdasfdffadfdasfdffadfdasfdffadfdasfdffadfdasfd
ffadfdasfdffadfdasfdffadfdasfdffadfdasf
＜/td＞
＜/tr＞
＜/テーブル＞
ここでは主にCSSスタイルを使用して制御します。<table>タグ内にstyle=TABLE-LAYOUT:があり、その記述は以下の通りです。
文法：
テーブルレイアウト: 自動 |
パラメータ:
auto: デフォルトの自動アルゴリズム。レイアウトは各セルの内容に基づきます。各セルが読み取られて計算されるまで、テーブルは表示されません。非常に遅い
固定: 固定レイアウト アルゴリズム。このアルゴリズムでは、水平レイアウトは表の幅、表の境界線の幅、セルの間隔、および列の幅のみに基づいており、現時点では表の内容とは関係ありません。 <td> タグの Style に WORD-WRAP: Break-word がない場合、テーブルの幅に応じて、テーブルの内容は部分的にのみ表示されます。ワードラップの指示は次のとおりです。
文法：
ワードラップ : 通常のブレークワード |
パラメータ:
Normal: 指定されたコンテナの境界を越えてコンテンツをプッシュできるようにします。
Break-word : コンテンツは境界内で分割されます。必要に応じて、単語の区切りも発生します
VBSCRIPTタグインデックス
基本操作
+ 数値の加算と文字列の連結
- 数字の引き算
* 数値の掛け算
/数字の割り算
余りを見つけるMOD
商を求めます
文字列連結(&)
^ パワー
= 等しい
＜＞ 等しくない
>= 以上
> より大きい
<= 以下
< 未満
ない
そして
あるいは、あるいは
ゾル
ループと意思決定
もし...ならば、もし...ならば...
if...then...else if...then...not
そうでなければ...そうでない場合
select case... グループ選択条件
エンドセレクト
for ... 次のカウントループ
while...wend 条件ループ (1)
do while...loop 条件付きループ (2)
do...loop while 条件ループ (3)
do until...loop 条件ループ (4)
do...loop until 条件ループ (5)
数学関数
絶対値
サインサイン
Hex 16 進数に変換します
Oct 8 進数に変換する
Sqr 平方根
Int は整数をとります
修正には整数が必要です
丸めは整数をとります
対数底 e 対数
正弦関数
コサイン関数
正接関数
文字列処理関数
レンストリングの長さ
Mid は文字列の一部になります
Left は文字列の先頭から文字列の一部を取得します
Right は文字列の末尾から文字列の一部を取得します。
Lcase 小文字に変換
大文字に変換します
トリムは文字列の先頭と末尾のスペースを削除します
Ltrim は文字列の先頭のスペースを削除します
Rtrim は文字列から末尾のスペースを削除します
Replace は文字列内の一部の文字を置き換えます
Instr は別の文字列に含まれているかどうかを判断します (先頭から検索)
InstrRevは別の文字列に含まれているかどうかを判定（末尾から検索）
任意の数のスペース スペース文字
文字列 任意の文字数の任意の文字
StrReverse は文字列を反転します
Split は文字列を特定の文字で分割します
データ型変換関数
Cint を整数に変換する
Cstr を文字列に変換
Clng 定数整数に変換
Cbool をブール関数に変換
Cdate を日付に変換する関数
単精度に変換された CSng
CDbl を倍精度に変換
日時関数
日付 現在の日付
今の時間
NO現在の日付と時刻
DateAdd は日付を追加します
DateDiff 2 つの日付の違い
Dateシリアル日付設定
DateValue 日付設定
年 現在の年
月 当月
今日
現在時刻
今分
2 番目になりました 2 番目になりました
タイマー 午前 0 時からの秒数
Timeシリアル時刻設定
TimeValue 時間部分
WeekDay 週名
MonthName 月の名前
その他の機能
配列は配列を生成します
Asc 文字 ASCII コード
Chr ASCII コード文字
フィルタ フィルタ アレイ
InputBox 入力ウィンドウ
結合は配列内の要素を結合します
MsgBox 情報ウィンドウ
Lbound 配列の下限
Ubound 配列の上限
命令
Const は定数を設定します
Dim は変数または配列を定義します
消去するとアレイがクリアされます
ReDim は配列を再宣言します
開始乱数をランダム化する
Rndは乱数を取得します
ASPオブジェクト
セッションオブジェクト
IsEmpty はセッション変数が存在するかどうかをテストします
TimeOut はセッション変数のライフサイクルを設定します
Abandon はセッション変数を強制的にクリアします
アプリケーションオブジェクト
IsEmpty はアプリケーション変数が存在するかどうかをテストします
ロック ロック アプリケーション変数
ロック解除 ロックコマンドのロックを解除します。
Cookieオブジェクト
Expires は Cookie 変数の有効期間を設定します。
接続オブジェクト
「開く」はデータベースへの接続を開きます
実行すると Recordset オブジェクトが開きます
閉じる Connection オブジェクトを閉じます
レコードセット オブジェクト
movefirst はレコード ポインタを最初のレコードに移動します
movelast はレコード ポインタを最後のレコードに移動します
movenext はレコード ポインタを次のレコードに移動します
moveprevious はレコード ポインタを前のレコードに移動します
bof はレコードセットの先頭かどうかをテストします
eof はレコードセットの終わりかどうかをテストします
open Recoreset オブジェクトを開きます
close はレコードセット オブジェクトを閉じます
データを読み取るためのフィールドサブオブジェクト
fileds.count フィールドの数
pagesize ページごとのレコード数
絶対ページは特定のページに設定されます
pagecount 総ページ数
絶対位置はレコードに直接ジャンプします
MicrosoftVBscript実行時エラー一覧（10進数表示）
エラー #5 プロシージャ呼び出しまたは引数が無効です
エラー #5 プロシージャ呼び出しまたは引数が無効です
エラー #6 オーバーフロー
エラー #7 メモリが不足しています
エラー #9 添字が範囲外です
エラー # 10 配列が固定長であるか、一時的にロックされています
エラー #11 ゼロ除算
エラー #13 タイプが一致しません
エラー #14 文字列スペースが不十分です
エラー #17 必要な操作を実行できません
エラー #28 スタック オーバーフロー
エラー #35 未定義のプロシージャまたは関数
エラー #48 DLL のロード中にエラーが発生しました
エラー #51 内部エラー
エラー #52 ファイル名または番号が間違っています
エラー #53 ファイルが見つかりません
エラー #54 間違ったファイルモード
エラー #55 ファイルはすでに開かれています
エラー #57 デバイス I/O エラー
エラー #58 ファイルはすでに存在します
エラー #61 ディスクがいっぱいです
エラー #62 入力がファイルの終わりを超えています
エラー #67 ファイルが多すぎます
エラー #68 デバイスが使用できません
エラー #70 許可がありません
エラー #71 ディスクの準備ができていません
エラー #74 名前の変更には他のドライブ シンボルを含めることはできません
エラー #75 パス/ファイル アクセス エラー
エラー #76 パスが見つかりません
エラー #91 オブジェクト変数が設定されていません
エラー #92 For ループが初期化されていません
エラー #94 Null の使用が無効です
エラー #322 必要な一時ファイルを作成できません
エラー #424 オブジェクトがありません
エラー #429 ActiveX コンポーネントはオブジェクトを作成できません
エラー #430 このクラスはオートメーション操作をサポートしていません
エラー # 432 オートメーション操作でファイル名またはクラス名が見つかりませんでした
エラー #438 オブジェクトはこのプロパティまたはメソッドをサポートしていません
エラー # 440 自動化操作エラー
エラー #445 オブジェクトはこの操作をサポートしていません
エラー #446 オブジェクトは名前付きパラメータをサポートしていません
エラー #447 オブジェクトは現在のロケール オプションをサポートしていません
エラー #448 名前付きパラメータが見つかりません
エラー #449 パラメータは必須です
エラー # 450 パラメータの数が間違っているか、パラメータの属性値が無効です
エラー #451 オブジェクトはコレクションではありません
エラー #453 指定された DLL 関数が見つかりませんでした
エラー #455 コード リソース ロック エラー
エラー #457 このキーはすでにこのコレクションの要素に関連付けられています
エラー #458 変数は、VBScript でサポートされていないオートメーション タイプを使用しています。
エラー #462 リモート サーバーが存在しないか、使用できません
エラー #481 無効な画像です
エラー #500 変数が定義されていません
エラー #501 不正な割り当て
エラー #502 オブジェクトをスクリプトでプログラムするのは安全ではありません
エラー #503 オブジェクトを安全に初期化できません
エラー #504 オブジェクトを安全に作成できません
エラー #505 無効な参照または修飾されていない参照
エラー #506 クラスが定義されていません
エラー #507 予期しないエラーが発生しました
エラー # 1001 メモリが不足しています
エラー # 1002 構文エラー
エラー # 1003 「:」がありません
エラー # 1005 '(' がありません
エラー # 1006 ')' がありません
エラー # 1007 ']' がありません
エラー #1010 識別子がありません
エラー # 1011 「=」がありません
エラー # 1012 「If」がありません
エラー # 1013 「宛先」がありません
エラー # 1014 「終了」がありません
エラー # 1015 「関数」がありません
エラー # 1016 「サブ」がありません
エラー # 1017 「Then」がありません
エラー # 1018 「Wend」がありません
エラー # 1019 「ループ」がありません
エラー # 1020 「次へ」がありません
エラー # 1021 「ケース」がありません
エラー # 1022 「選択」がありません
エラー #1023 式がありません
エラー # 1024 ステートメントがありません
エラー # 1025 ステートメントが終了していません
エラー # 1026 整数定数がありません
エラー # 1027 「while」または「until」がありません
エラー # 1028 'while' と 'Until' が欠落しているか、ステートメントが終了していません
エラー #1029 'With' がありません
エラー # 1030 識別子が長すぎます
エラー # 1031 無効な番号です
エラー #1032 無効な文字です
エラー # 1033 終了していない文字列定数
エラー # 1034 コメントが終了していません
エラー # 1037 「Me」キーワードの使用が無効です
エラー # 1038 'loop' ステートメントに 'do' がありません
エラー # 1039 無効な 'exit' ステートメント
エラー # 1040 ループ制御変数 'for' が無効です
エラー # 1041 名前の再定義
エラー #1042 は行の最初のステートメントでなければなりません
エラー # 1043 ByVal 以外のパラメータに値を割り当てることはできません
エラー #1044 サブルーチンを呼び出すときに括弧は使用できません
エラー # 1045 リテラル定数がありません
エラー # 1046 「In」がありません
エラー # 1047 「クラス」がありません
エラー #1048 はクラス内で定義する必要があります
エラー #1049 プロパティ宣言に Let、Set、または Get がありません
エラー # 1050 「プロパティ」がありません
エラー # 1051 変数の数はすべてのプロパティの仕様で一貫している必要があります
エラー # 1052 クラス内で複数のデフォルトのプロパティ/メソッドを使用することはできません
エラー # 1053 クラスの初期化または終了プロシージャに変数がありません
エラー #1054 set または let 属性には少なくとも 1 つの変数が必要です
エラー # 1055 '次へ' が間違っています
エラー # 1056 「Default」は「Property」、「Function」、または「Sub」でのみ指定できます
エラー # 1057 「Default」を指定する場合は、「Public」も指定する必要があります。
エラー # 1058 「デフォルト」はプロパティ取得でのみ指定できます
エラー #4096 Microsoft VBScript コンパイラ エラー
エラー #4097 Microsoft VBScript ランタイム エラー
エラー #5016 正規表現オブジェクトがありません
エラー #5017 正規表現の構文エラー
エラー #5018 数量指定子が間違っています
エラー #5019 正規表現に「]」がありません
エラー #5020 正規表現に ')' がありません
エラー #5021 文字セットが範囲外です
ツリーメニュー:
＜SCRIPT言語=JavaScript＞
var lastObj
関数expandIt(obj)
{
if(lastObj != null)
{
if(obj == lastObj)
{
if(obj.style.display == なし)
{
obj.style.display = ;
}
それ以外
{
obj.style.display = なし
}
}
それ以外
{
lastObj.style.display = なし;
obj.style.display = ;
}
}
それ以外
{
obj.style.display = ;
}
最後のオブジェクト = オブジェクト
}
＜/スクリプト＞
<テーブル幅=100% ボーダー=0 セルスペース=0 セルパディング=0>
<%
薄暗い
id = リクエスト(id)
ディム strsql、rs
strsql=select * from p_type where slang=1 および typelevel=1 はタイプ名で並べ替えます
set rs=fgetrslist(strsql)
rs.eof ではないときに実行します
%>
＜tr＞
＜td height=25 class=LEFTLINKS＞＜img width=30 height=0 align=absmiddle /＞＜b＞＜%if rs(isleaf)=0 then%＞＜a href=# onClick=javascript:expandIt(kb＜ %=rs(id)%>);return false＞＜%else%＞＜a href=＜%=request.ServerVariables(SCRIPT_NAME)%＞?idtree=＜%=rs(idtree)%＞＞＜%end if%＞＜%=server.HTMLEncode(right((rs(型名)&),len(rs(型名)&)-2))%＞＜/a＞＜/b＞＜/td＞
＜/tr＞
<%
IF clng(id)=clng(rs(id)) then
%>
＜tr id=kb＜%=rs(id)%＞＞
<%
それ以外
%>
<tr id=kb<%=rs(id)%> style=display:none;>
<%
終了する場合
%>
＜td＞
<テーブル>
<%
ディムズ1
strsql=select * from p_type whereparentid=&rs(id)& および slang=1 はタイプ名で並べ替えます
set rs1=fgetrslist(strsql)
rs1.eof ではないときに実行します
%>
＜tr＞＜td height=20 class=LEFTLINKS＞
＜img width=40 height=0 align=absmiddle />＞＜a href=＜%=request.ServerVariables(SCRIPT_NAME)%＞?idtree=＜%=rs1(idtree)%＞&id=＜%=rs(id)% ＞ ＞＜%=server.HTMLEncode(right((rs1(型名)&),len(rs1(型名)&)-2))%＞＜/a＞＜/td＞＜/tr＞
<%
rs1.movenext
ループ
rs1.close
rs1=何も設定しない
%>
＜/テーブル＞
＜/td＞
＜/tr＞
<%
rs.movenext
ループ
rs.close
rs=何も設定しない
%>
＜/テーブル＞