三流君(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/03/21 9:14:28 , 不満

76行目 2017/03/21 11:18:18 , 満足
77行目 2017/03/21 14:12:55 , 普通
78行目 2017/03/22 11:07:58 , 普通
79行目 2017/03/22 14:49:07 , 普通
80行目 2017/03/22 18:44:57 , 普通

81行目 2017/03/22 19:20:04 , 不正なパラメーターです
82行目 2017/03/22 23:49:58 , 満足
83行目 2017/03/23 11:16:21 , 不正なパラメーターです
84行目 2017/03/23 17:51:08 , 不満
85行目 2017/03/23 17:51:11 , 不満

86行目 2017/03/24 8:01:00 , 普通
87行目 2017/03/24 21:06:22 , 不正なパラメーターです
88行目 2017/03/25 1:34:44 , 不正なパラメーターです
89行目 2017/03/25 6:15:28 , 不満
90行目 2017/03/25 7:26:39 , 不正なパラメーターです

91行目 2017/03/25 7:43:30 , 不正なパラメーターです
92行目 2017/03/25 9:11:49 , 不満
93行目 2017/03/25 9:13:26 , 満足
94行目 2017/03/25 9:14:20 , 不正なパラメーターです
95行目 2017/03/25 11:17:51 , 不正なパラメーターです

96行目 2017/03/26 8:59:43 , 不正なパラメーターです
97行目 2017/03/26 16:17:37 , 満足
98行目 2017/03/26 23:27:04 , 普通
99行目 2017/03/27 15:13:58 , 不満
100行目 2017/03/27 16:02:43 , 不満

101行目 2017/03/27 20:06:26 , 満足
102行目 2017/03/27 20:17:36 , 不満
103行目 2017/03/27 20:17:41 , 満足
104行目 2017/03/27 20:17:44 , 普通
105行目 2017/03/28 19:01:26 , 満足

106行目 2017/03/29 2:19:14 , 不正なパラメーターです
107行目 2017/03/29 2:22:10 , 不正なパラメーターです
108行目 2017/03/29 5:07:59 , 不満
109行目 2017/03/29 8:10:26 , 普通
110行目 2017/03/29 10:16:14 , 普通

111行目 2017/03/29 10:42:16 , 満足
112行目 2017/03/30 0:04:15 , 満足
113行目 2017/03/30 4:20:46 , 不正なパラメーターです
114行目 2017/03/30 8:13:11 , 不正なパラメーターです
115行目 2017/03/31 4:13:59 , 不満

116行目 2017/03/31 5:24:36 , 満足
117行目 2017/04/01 1:58:54 , 満足
118行目 2017/04/01 1:58:59 , 普通
119行目 2017/04/01 1:59:00 , 不満
120行目 2017/04/01 23:39:20 , 不満

121行目 2017/04/02 7:46:46 , 満足
122行目 2017/04/03 0:23:06 , 普通
123行目 2017/04/03 2:52:54 , 不正なパラメーターです
124行目 2017/04/03 4:21:25 , 満足
125行目 2017/04/03 5:26:36 , 普通

126行目 2017/04/03 16:31:52 , 不正なパラメーターです
127行目 2017/04/04 23:51:41 , 不正なパラメーターです
128行目 2017/04/05 0:47:25 , 不正なパラメーターです
129行目 2017/04/05 1:06:08 , 満足
130行目 2017/04/05 2:13:36 , 普通

131行目 2017/04/05 3:56:46 , 不正なパラメーターです
132行目 2017/04/07 0:34:14 , 不満
133行目 2017/04/07 4:43:33 , 普通
134行目 2017/04/07 6:28:14 , 不満
135行目 2017/04/07 18:34:10 , 普通

136行目 2017/04/07 19:00:19 , 不正なパラメーターです
137行目 2017/04/07 20:18:59 , 普通
138行目 2017/04/08 1:57:52 , 満足
139行目 2017/04/08 5:05:31 , 満足
140行目 2017/04/08 12:30:51 , 満足

141行目 2017/04/08 16:41:10 , 普通
142行目 2017/04/08 17:23:04 , 普通
143行目 2017/04/08 22:11:20 , 満足
144行目 2017/04/09 1:11:37 , 不正なパラメーターです
145行目 2017/04/09 1:51:11 , 満足

146行目 2017/04/09 7:26:46 , 満足
147行目 2017/04/09 9:10:00 , 普通
148行目 2017/04/10 19:57:23 , 不正なパラメーターです
149行目 2017/04/10 23:36:33 , 不正なパラメーターです
150行目 2017/04/11 0:04:08 , 不満

151行目 2017/04/11 2:20:21 , 不満
152行目 2017/04/11 23:55:56 , 不正なパラメーターです
153行目 2017/04/12 13:05:02 , 不満
154行目 2017/04/13 6:24:57 , 不満
155行目 2017/04/14 5:06:14 , 不満

156行目 2017/04/14 5:37:57 , 普通
157行目 2017/04/15 5:55:23 , 満足
158行目 2017/04/15 6:17:59 , 満足
159行目 2017/04/15 13:47:28 , 不正なパラメーターです
160行目 2017/04/16 4:15:47 , 不正なパラメーターです

161行目 2017/04/17 2:26:32 , 不満
162行目 2017/04/17 18:04:05 , 不満
163行目 2017/04/18 6:20:28 , 不正なパラメーターです
164行目 2017/04/18 17:05:09 , 満足
165行目 2017/04/18 23:46:49 , 不正なパラメーターです

166行目 2017/04/19 14:11:43 , 満足
167行目 2017/04/19 16:28:47 , 普通
168行目 2017/04/20 6:57:26 , 不正なパラメーターです
169行目 2017/04/20 7:09:13 , 不正なパラメーターです
170行目 2017/04/20 9:05:45 , 不正なパラメーターです

171行目 2017/04/20 21:16:18 , 不正なパラメーターです
172行目 2017/04/21 7:49:58 , 普通
173行目 2017/04/21 9:11:15 , 普通
174行目 2017/04/21 16:40:13 , 満足
175行目 2017/04/22 4:00:06 , 満足

176行目 2017/04/22 4:00:11 , 普通
177行目 2017/04/22 4:00:15 , 不満
178行目 2017/04/22 16:54:30 , 不満
179行目 2017/04/22 21:08:59 , 普通
180行目 2017/04/23 3:08:33 , 満足

181行目 2017/04/23 11:43:36 , 不正なパラメーターです

使用した元データの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/04/24 4:44:46です。