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

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

Right("000" & nLINE, 3)を使用して001の三桁で表示 Right関数解説

test019-1.asp
動作仕様:
test008.txtを読み込み、5行単位で線を引く(<HR>タグを入れる)
行番号を001の三桁0付きで表示する

001行目 2008/04/22 10:01:13 , 不満
002行目 2008/04/22 10:22:22 , 普通
003行目 2008/04/22 10:23:00 , 満足
004行目 2008/04/22 10:27:20 , 不正なパラメーターです
005行目 2008/04/22 10:31:27 , 不満

006行目 2008/04/22 10:51:42 , 普通
007行目 2008/04/22 10:52:54 , 満足
008行目 2008/04/22 10:56:48 , 不正なパラメーターです
009行目 2008/04/22 11:00:42 , 不満
010行目 2008/04/22 11:21:35 , 普通

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

016行目 2008/05/10 21:46:37 , 普通
017行目 2008/05/11 9:37:27 , 不満
018行目 2008/05/11 11:45:59 , 満足
019行目 2008/05/11 14:04:20 , 普通
020行目 2008/05/11 15:22:15 , 普通

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

026行目 2008/05/12 1:13:36 , 満足
027行目 2008/05/12 1:13:39 , 普通
028行目 2008/05/12 1:13:41 , 不満
029行目 2008/05/12 5:37:18 , 不満
030行目 2008/05/12 8:22:31 , 不正なパラメーターです

031行目 2008/05/12 9:41:44 , 不満
032行目 2008/05/12 13:15:24 , 満足
033行目 2008/05/12 16:16:27 , 不正なパラメーターです
034行目 2008/05/12 23:52:06 , 普通
035行目 2008/05/13 9:36:00 , 不正なパラメーターです

036行目 2008/05/13 9:44:18 , 不満
037行目 2008/05/13 10:16:23 , 不正なパラメーターです
038行目 2008/05/13 13:27:09 , 満足
039行目 2008/05/13 16:24:39 , 不正なパラメーターです
040行目 2008/05/13 20:47:01 , 不正なパラメーターです

041行目 2008/05/13 22:36:36 , 不正なパラメーターです
042行目 2008/05/13 23:55:44 , 普通
043行目 2008/05/14 10:29:14 , 不満
044行目 2008/05/14 11:35:27 , 満足
045行目 2008/05/14 13:32:14 , 満足

046行目 2008/05/14 16:36:18 , 不正なパラメーターです
047行目 2008/05/14 16:40:55 , 不満
048行目 2008/05/14 21:10:09 , 満足
049行目 2008/05/14 21:29:06 , 満足
050行目 2008/05/15 0:03:37 , 普通

051行目 2008/05/15 10:58:29 , 不満
052行目 2008/05/15 13:37:08 , 満足
053行目 2008/05/15 16:23:39 , 不正なパラメーターです
054行目 2008/05/15 16:40:01 , 不正なパラメーターです
055行目 2008/05/15 23:01:19 , 不正なパラメーターです

056行目 2008/05/15 23:28:43 , 不満
057行目 2008/05/16 0:13:24 , 普通
058行目 2008/05/16 0:41:33 , 不満
059行目 2008/05/16 5:06:14 , 満足
060行目 2008/05/16 5:13:39 , 不正なパラメーターです

061行目 2008/05/16 7:13:27 , 普通
062行目 2008/05/16 9:59:21 , 満足
063行目 2008/05/16 11:08:01 , 不満
064行目 2008/05/16 15:36:58 , 普通
065行目 2008/05/16 15:54:51 , 不正なパラメーターです

066行目 2008/05/16 17:55:26 , 不正なパラメーターです
067行目 2008/05/17 0:26:10 , 普通
068行目 2008/05/17 4:29:19 , 満足
069行目 2008/05/17 18:33:22 , 不正なパラメーターです
070行目 2008/05/18 0:29:35 , 普通

071行目 2008/05/18 1:09:15 , 不正なパラメーターです
072行目 2008/05/18 4:04:56 , 不正なパラメーターです
073行目 2008/05/18 18:39:36 , 不正なパラメーターです
074行目 2008/05/18 21:58:11 , 不正なパラメーターです
075行目 2017/03/21 9:14:28 , 不満

076行目 2017/03/21 11:18:18 , 満足
077行目 2017/03/21 14:12:55 , 普通
078行目 2017/03/22 11:07:58 , 普通
079行目 2017/03/22 14:49:07 , 普通
080行目 2017/03/22 18:44:57 , 普通

081行目 2017/03/22 19:20:04 , 不正なパラメーターです
082行目 2017/03/22 23:49:58 , 満足

使用したtest008.txtを見る



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

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

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

表示色の説明:ASP VBScriptは <% 〜 %>
キーワードはRight です。 <%@LANGUAGE=VBScript%> <html> <head><META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>Right("000" & nLINE, 3)を使用して001の三桁で表示 Right関数解説</title> </head> <body> <h2>Right("000" & nLINE, 3)を使用して001の三桁で表示 Right関数解説</h2> test019-1.asp<br> 動作仕様:<br> test008.txtを読み込み、5行単位で線を引く(<HR>タグを入れる)<br> 行番号を001の三桁0付きで表示する<br> <hr> <% 'FileSystemObjectを生成します Set objFS = Server.CreateObject("Scripting.FileSystemObject") 'test008.txt を読取専用モードで開く Set ts = objFS.OpenTextFile(Server.MapPath("test008.txt"), 1, True) Dim nLINE '行数のカウンター nLINE = 0 'カウンターを初期化 Do While ts.AtEndOfStream = False '*6ファイルの終端になってない間ループ strDATA = ts.ReadLine 'ファイルからデータを一行を読む nLINE = nline + 1 '行カウンタを+1する Response.Write Right("000" & nLINE, 3) & "行目 " '*1行番号の表示 Response.Write strDATA '読み込んだデータを表示 Response.Write "<BR>" '改行のタグを入れる '行カウンタが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. --[恋声 ボイスチェンジ フリーソフト]
  2. --[【ガチャ】モンスト 3500万人記念!!オーブ0ガチャ]
  3. --[Access コンボボックスを使ってみた]
  4. --[ Windows7 OSのフルバックアップ システムイメージバックアップ]

Googleで関連項目を検索する

[キーワード:Right] と サンプル|解説|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/03/23 11:12:52です。