Classic ASPテストページです。
情報が古いので参考程度に読んだりテストしてみてください。
共有サーバーなので、処理に時間がかかるとタイムアウトやアクセスが集中すると落ちている時がありますがご勘弁を・・・

三流君(TOP) /ASPで遊ぶ /ASP記事一覧を見る

分類: [Form関係] /DB系ADOを使い( [Mdb接続] [CSV接続] [Excel接続]) /[ASPでTextFileを操作] /[VBScript関数ほか]

MOD で 余りを計算する 解説

test018-1.asp
動作仕様:test008.txtを読み込み、5行単位で線を引く(<HR>タグを入れる)
If nLINE Mod 5 = 0 Then で、÷5の余りが0の時<HR>タグを使ってます
※表示後のソースをみて下さい。

1行目 2008/04/22 10:01:13 , 不満
2行目 2008/04/22 10:22:22 , 普通
3行目 2008/04/22 10:23:00 , 満足
4行目 2008/04/22 10:27:20 , 不正なパラメーターです
5行目 2008/04/22 10:31:27 , 不満

6行目 2008/04/22 10:51:42 , 普通
7行目 2008/04/22 10:52:54 , 満足
8行目 2008/04/22 10:56:48 , 不正なパラメーターです
9行目 2008/04/22 11:00:42 , 不満
10行目 2008/04/22 11:21:35 , 普通

11行目 2008/05/09 15:57:19 , 不正なパラメーターです
12行目 2008/05/09 21:29:22 , 普通
13行目 2008/05/10 9:31:33 , 不満
14行目 2008/05/10 11:40:58 , 満足
15行目 2008/05/10 16:08:10 , 不正なパラメーターです

16行目 2008/05/10 21:46:37 , 普通
17行目 2008/05/11 9:37:27 , 不満
18行目 2008/05/11 11:45:59 , 満足
19行目 2008/05/11 14:04:20 , 普通
20行目 2008/05/11 15:22:15 , 普通

21行目 2008/05/11 15:43:29 , 満足
22行目 2008/05/11 15:55:44 , 不満
23行目 2008/05/11 16:11:25 , 不正なパラメーターです
24行目 2008/05/11 17:55:10 , 不正なパラメーターです
25行目 2008/05/11 21:49:51 , 普通

26行目 2008/05/12 1:13:36 , 満足
27行目 2008/05/12 1:13:39 , 普通
28行目 2008/05/12 1:13:41 , 不満
29行目 2008/05/12 5:37:18 , 不満
30行目 2008/05/12 8:22:31 , 不正なパラメーターです

31行目 2008/05/12 9:41:44 , 不満
32行目 2008/05/12 13:15:24 , 満足
33行目 2008/05/12 16:16:27 , 不正なパラメーターです
34行目 2008/05/12 23:52:06 , 普通
35行目 2008/05/13 9:36:00 , 不正なパラメーターです

36行目 2008/05/13 9:44:18 , 不満
37行目 2008/05/13 10:16:23 , 不正なパラメーターです
38行目 2008/05/13 13:27:09 , 満足
39行目 2008/05/13 16:24:39 , 不正なパラメーターです
40行目 2008/05/13 20:47:01 , 不正なパラメーターです

41行目 2008/05/13 22:36:36 , 不正なパラメーターです
42行目 2008/05/13 23:55:44 , 普通
43行目 2008/05/14 10:29:14 , 不満
44行目 2008/05/14 11:35:27 , 満足
45行目 2008/05/14 13:32:14 , 満足

46行目 2008/05/14 16:36:18 , 不正なパラメーターです
47行目 2008/05/14 16:40:55 , 不満
48行目 2008/05/14 21:10:09 , 満足
49行目 2008/05/14 21:29:06 , 満足
50行目 2008/05/15 0:03:37 , 普通

51行目 2008/05/15 10:58:29 , 不満
52行目 2008/05/15 13:37:08 , 満足
53行目 2008/05/15 16:23:39 , 不正なパラメーターです
54行目 2008/05/15 16:40:01 , 不正なパラメーターです
55行目 2008/05/15 23:01:19 , 不正なパラメーターです

56行目 2008/05/15 23:28:43 , 不満
57行目 2008/05/16 0:13:24 , 普通
58行目 2008/05/16 0:41:33 , 不満
59行目 2008/05/16 5:06:14 , 満足
60行目 2008/05/16 5:13:39 , 不正なパラメーターです

61行目 2008/05/16 7:13:27 , 普通
62行目 2008/05/16 9:59:21 , 満足
63行目 2008/05/16 11:08:01 , 不満
64行目 2008/05/16 15:36:58 , 普通
65行目 2008/05/16 15:54:51 , 不正なパラメーターです

66行目 2008/05/16 17:55:26 , 不正なパラメーターです
67行目 2008/05/17 0:26:10 , 普通
68行目 2008/05/17 4:29:19 , 満足
69行目 2008/05/17 18:33:22 , 不正なパラメーターです
70行目 2008/05/18 0:29:35 , 普通

71行目 2008/05/18 1:09:15 , 不正なパラメーターです
72行目 2008/05/18 4:04:56 , 不正なパラメーターです
73行目 2008/05/18 18:39:36 , 不正なパラメーターです
74行目 2008/05/18 21:58:11 , 不正なパラメーターです
75行目 2017/07/05 23:55:14 , 不正なパラメーターです

76行目 2017/07/05 23:56:13 , 不満
77行目 2017/07/07 0:55:10 , 満足
78行目 2017/07/07 0:55:41 , 満足
79行目 2017/07/07 0:57:16 , 不満
80行目 2017/07/07 9:30:43 , 普通

81行目 2017/07/07 9:31:13 , 満足
82行目 2017/07/07 9:32:20 , 満足
83行目 2017/07/07 9:34:14 , 不満
84行目 2017/07/07 17:05:44 , 不満
85行目 2017/07/07 18:23:55 , 普通

86行目 2017/07/08 16:49:29 , 普通
87行目 2017/07/09 6:48:17 , 満足
88行目 2017/07/09 8:49:08 , 普通
89行目 2017/07/09 8:50:39 , 不満
90行目 2017/07/09 18:07:52 , 不正なパラメーターです

91行目 2017/07/09 18:11:17 , 不満
92行目 2017/07/09 18:11:17 , 満足
93行目 2017/07/09 18:11:17 , 普通
94行目 2017/07/10 8:10:03 , 不正なパラメーターです
95行目 2017/07/10 8:11:51 , 普通

96行目 2017/07/10 16:13:11 , 普通
97行目 2017/07/10 16:13:20 , 満足
98行目 2017/07/10 16:46:25 , 満足
99行目 2017/07/10 21:42:33 , 満足
100行目 2017/07/11 9:22:03 , 不正なパラメーターです

101行目 2017/07/11 11:11:35 , 満足
102行目 2017/07/11 16:41:09 , 普通
103行目 2017/07/11 17:19:13 , 不正なパラメーターです
104行目 2017/07/11 17:47:27 , 満足
105行目 2017/07/11 17:49:59 , 不正なパラメーターです

106行目 2017/07/13 2:44:42 , 満足
107行目 2017/07/13 2:44:42 , 満足
108行目 2017/07/13 8:17:03 , 不正なパラメーターです
109行目 2017/07/13 13:29:29 , 不正なパラメーターです
110行目 2017/07/13 23:29:47 , 不満

111行目 2017/07/15 14:21:24 , 不満
112行目 2017/07/15 14:22:23 , 不正なパラメーターです
113行目 2017/07/15 14:23:29 , 普通
114行目 2017/07/16 2:47:50 , 満足
115行目 2017/07/16 5:21:37 , 不正なパラメーターです

116行目 2017/07/16 8:13:28 , 満足
117行目 2017/07/17 1:13:27 , 不満
118行目 2017/07/17 7:15:12 , 満足
119行目 2017/07/17 11:17:10 , 普通
120行目 2017/07/17 14:41:48 , 不正なパラメーターです

121行目 2017/07/18 20:18:28 , 不満
122行目 2017/07/19 2:48:10 , 不正なパラメーターです
123行目 2017/07/19 8:30:07 , 不満
124行目 2017/07/19 14:04:21 , 不満
125行目 2017/07/20 4:43:54 , 満足

126行目 2017/07/20 7:19:22 , 普通
127行目 2017/07/20 8:22:02 , 不正なパラメーターです
128行目 2017/07/20 9:50:24 , 満足
129行目 2017/07/20 15:17:18 , 不満
130行目 2017/07/20 15:18:18 , 普通

131行目 2017/07/20 21:07:10 , 不満
132行目 2017/07/20 21:25:16 , 不正なパラメーターです

使用した元データのtest008.txtを見る



Modを使用したサンプル(ソースの紹介)

詳細解説は[http:/asp/backno/asp018.html]を見てください
下記、/cgi-bin/test/test018-1.aspのソース(中身)です

Mod を 使った ソースコードを紹介する

表示色の説明:ASP VBScriptは <% 〜 %>
キーワードはMod です。 <%@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>MOD で 余りを計算する 解説</title> </head> <body> <h2>MOD で 余りを計算する 解説</h2> test018-1.asp<br> 動作仕様:test008.txtを読み込み、5行単位で線を引く(<HR>タグを入れる)<br> If nLINE Mod 5 = 0 Then で、÷5の余りが0の時<HR>タグを使ってます<br> ※表示後のソースをみて下さい。<br> <hr> <% 'FileSystemObjectを生成します Set objFS = Server.CreateObject("Scripting.FileSystemObject") 'test008.txt を読取専用モードで開く Set ts = objFS.OpenTextFile(Server.MapPath("test008.txt"), 1, True) Dim nLINE '*1行数のカウンター nLINE = 0 'カウンターを初期化 Do While ts.AtEndOfStream = False '*6ファイルの終端になってない間ループ strDATA = ts.ReadLine 'ファイルからデータを一行を読む nLINE = nline + 1 '*2行カウンタを+1する Response.Write nLINE & "行目 " '行番号の表示 Response.Write strDATA '読み込んだデータを表示 Response.Write "<BR>" '改行のタグを入れる '*3行カウンタが5、10、15、、5で/って余りが0なら '<HR>タグを挿入する If nLINE Mod 5 = 0 Then Response.Write "<HR>" 'タグを入れる End If Loop ts.close '使ったファイルは閉じようよ %> <hr> <A HREF="test008.txt">使用した元データのtest008.txtを見る</A><br> <br> </body> </html>

広告

リンク広告
  1. --[ Windows10 OSのフルバックアップ システムイメージバックアップ]
  2. --[Windows 自動ログイン control userpasswords2 や netplwiz]
  3. --[モンスト 超獣神祭]
  4. --[【ガチャ】モンスト 3500万人記念!!オーブ0ガチャ]
  5. --[Access コンボボックスを使ってみた]

Googleで関連項目を検索する

[キーワード:Mod] と サンプル|解説|Dim|Set で検索
↓で検索して他のページも確認してみてください。

Google

あれ?私のページが検索に載ってない(笑)一度お試しを(私のページに、また戻ってきてね(爆))

[Topへ戻る] −−>[ASP系のTOPへ戻る] −−>[記事一覧を見る]

リンク 三流君 ASP系 の 解説を項目ごとにまとめてみました

まぁ、基本はデータの受け取りかなぁ。
・[Form等を使用したデータのやり取り]・・・ASPと言っても、HTMLの入力フォームからデータを受け取ります。POSTやGETでやりとりを押さえますか。

次は、データの入出力 で ADOを使った(ADOで接続) と SQLの解説を少々
・[ADOでMdbファイルを使う]・・・MDBと接続して、簡単な追加・更新・削除を行った。
・[ADOでExcelと接続してみた]・・・.xlsと接続してSQLを使ってみた。
・[ADOでCSVと接続してみた]・・・.CSV テキストを読み出した。※更新・削除はできません

DBが使えるので、あまり使用しないけど、普通のテキストファイル処理
・[テキストファイル処理]・・・ファイルを開いて、書き込む。1行読み込みなどを軽く



VBScriptでFormat関数が無いなど、微妙にVBAと違うけど
[VBScript関数関係の説明]・・・少し、処理を書いてみた。
[その他処理サンプル]・・・あまり良いサンプル作れなかったけど。。。
何かの参考となれば幸いです。

その他:blogや広告↓
[日記的なblog]← あまり更新してないけど・・・
[永遠の下書き日記?]← 恥ずかしいのであまり載せてないけど・・・
[ひとりで掲示板?] ←一人で?掲示板?ぉぃぉぃ


[Topへ戻る] −−>[ASP系のTOPへ戻る] −−>[記事一覧を見る]

現在時刻は、2017/07/20 21:31:20です。