Server IISの設定が変更になった?ので、過去のテストがうまく動かない場合があります。
情報も古いのでソースは参考程度に・・・<>

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

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

ASPからMDBファイルにアクセスしてみる Microsoft.Jet.OLEDB.4.0

test026-1.asp

Set db=Server.CreateObject("ADODB.Connection")
db.Provider = "Microsoft.Jet.OLEDB.4.0"
db.ConnectionString = Server.MapPath("db026.mdb")
db.open
なんて感じで、簡単にASPからAccessMDBへ接続できます。
(db026.mdbと接続してます)
※ソースや他のサンプルを見て、確認してみてください。

IDF_TITLEF_MEMOWriteTime
275お礼(^。^)いつもタメにならないメルマガありがとう2003/04/25 11:53:22
3357040315テスト入力2004/03/15 12:39:34
4857aaaccc2005/07/14 16:03:06
48721234562005/08/23 12:08:22
487601022005/08/26 11:03:44
5351テスト解らん2006/05/02 11:51:09
5458aaaaaaaaaaaa2007/01/24 0:25:28
5675IE操作UWSC使用が正解 変な記事書き続けるなボケ2007/09/09 23:31:41
6025解らん使えないサイトだな2008/05/03 5:23:24
6026説明が下手理解が難しい・・・2008/05/04 4:57:50
6027こんにちわ!!いつも三流君見てます!!ちょぉ好きだおおお((年上さまにむかってすみせんほんとだあい好きですがんばってください!!2008/05/05 23:03:29
6028たまに見てます●チョー大嫌い がんばら内で四んで下さい●2008/05/06 5:58:32
6035KY空気読め2008/05/15 11:43:01
6037メッセージ消すなよよくわからない2008/05/16 0:35:00
6045だからIE操作はUWSC使用が正解,変な記事書き続けるなボケ ってイッテンダロ2008/05/20 22:23:23
6101心を磨けこころざしが不愉快だからもうここには来ないわ2008/07/11 10:31:55
6133こう言うのもなんだけど,最近アナタの書く記事はなんかツメが甘いよ(間違いばっか)2008/09/09 6:41:26
6143四ねネットの世界から消えてください よろしくお願いします。※記事を全て消せ2008/09/25 14:51:23
6267↓だよねぇ↓これだから三流は。はやく記事消せよ。ネットの世界から消えろ2009/02/14 23:09:35
6268IE操作UWSC使用が正解 変な記事書き続けるなボケ2009/02/14 23:14:24
6295能ある鷹は爪を隠すバカな三流はネットで恥晒す。はやく記事消せよ。ネットの世界から消えろ2009/02/25 15:23:18
6304'の入力strMEMO = Replace(strMEMO, "'", "''") 'シングルコーテーションを2個に置換2009/02/26 4:52:26
6310参照設定ヤレよボケオイ三流、サンプル作るなら参照設定しろ、テメエの不良サンプルが他の掲示板で迷惑をかけてます。2009/02/27 13:39:01
6321違いが知りたいreplace と insert の違いくらい書いてほしい2009/03/12 3:43:12
6423&のテスト&が&amp;にばけるんです・・・2009/05/30 18:13:38
6465生き恥を曝す修正対応しろよボケ2009/06/17 8:25:37
6466格好付けて熱弁してるところ申し訳ないですけどIE操作のサンプルだいぶ間違ってますよタコ2009/06/17 15:37:54
6493素人が偉そうにするなCOMPLETE のステートになるまでポーリングして待つコードは良く見かけますが、これはアマチュアのコーディングだと思います。プロだったらイベントで処理しましょう。2009/07/23 1:15:45
6495lemon馬鹿2009/07/23 15:53:51
6502耳クソのおいらが目くそ鼻くそを笑うと書き込んでみたぞ。2009/07/27 9:19:44
6525IE操作UWSC使用が正解 変な記事書き続けるなボケ2009/08/10 11:17:09
6526私からの意見ですが連絡が少し遅いように見受けられました。2010/09/25 13:12:07
6527もう少し素早い対応をしていただきますと嬉しかったです。2010/09/25 13:13:11
6528メールの書き方をもう少し工夫されたほうがよいと思われます2010/09/25 13:14:31
6529これってロボフォーム操作した方が安全で確実だと思いますが・・2011/08/30 4:11:19
6530結局何がしたいのか、何が言いたいのか良く分かりません・・・2011/08/30 4:12:40
6531こういう人がいて困る脳みそ内トレースを自分語で垂れ流す2011/09/02 10:12:37
6532これで説明してると思ってるのがタチ悪い。2011/09/02 10:13:08
6533I suggestYou are not right.2011/09/06 14:59:19
6534てめえんとこのページ糞なのに検索上位 正直(゚Д゚)ウゼェ2011/11/13 9:00:51
6535TITLE63好きな文字を入れてください2017/04/27 12:27:42
6536TITLE683好きな文字を入れてください2017/04/27 13:34:26
6537TITLE775好きな文字を入れてください2017/05/02 11:53:01
6538TITLE744んひい2017/05/02 19:27:16
6539TITLE810好きな文字を入れてください2017/05/08 16:37:54
6540がんば応援ひてます2017/05/08 16:40:15
6541sdふぁsあfsdf2017/05/10 10:54:17
6542TITLE887好きな文字を入れてください2017/05/12 11:55:21
6543TITLE907好きな文字を入れてください2017/05/12 15:17:57
65441txtx2017/05/15 9:26:46
6545TITLE754好きな文字を入れてください2017/05/18 15:00:51
6546TITLE101好きな文字を入れてください2017/05/26 14:32:20
6547TITLE59好きな文字を入れてください2017/05/26 15:29:38

終了です。


Microsoft.Jet.OLEDB.4.0を使用したサンプル(ソースの紹介)

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

Microsoft.Jet.OLEDB.4.0 を 使った ソースコードを紹介する

表示色の説明:ASP VBScriptは <% 〜 %>
キーワードはMicrosoft.Jet.OLEDB.4.0 です。 <%@LANGUAGE=VBScript%> <% Response.CacheControl = "no-cache" %> <% Response.AddHeader "Pragma", "no-cache" %> <% Response.Expires = -1 %> <html> <head> <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis"> <title>ASPからMDBファイルにアクセスしてみる Microsoft.Jet.OLEDB.4.0</title> </head> <body> <h1>ASPからMDBファイルにアクセスしてみる Microsoft.Jet.OLEDB.4.0</h1> test026-1.asp<br> <hr> Set db=Server.CreateObject(&quot;ADODB.Connection&quot;)<br> db.Provider = &quot;Microsoft.Jet.OLEDB.4.0&quot;<br> db.ConnectionString = Server.MapPath(&quot;db026.mdb&quot;)<br> db.open<br> なんて感じで、簡単にASPからAccessMDBへ接続できます。<br> (db026.mdbと接続してます)<br> ※ソースや他のサンプルを見て、確認してみてください。<br> <hr> <% 'ADO DB Connection オブジェクトを作成する、英文そのままじゃん Set db=Server.CreateObject("ADODB.Connection") '.Provider?プロバイダー?通信会社?じゃなくって 'データアクセスにはJet.OLEDB.4.0を使うことを設定 db.Provider = "Microsoft.Jet.OLEDB.4.0" '次に、接続DBの位置を渡すので、Server.MapPathで変換して渡す db.ConnectionString = Server.MapPath("db026.mdb") 'やっとデータベースを開ける db.open 'お約束のレコードセットの作成 テーブル名TESTから全項目(*)を指定 Set rs = db.Execute("Select * From TEST") 'データの表示をテーブルで行う Response.Write "<TABLE Border='1'>" '見出しをバカっぽく、そのまま書き込む Response.Write "<TR>" Response.Write "<TD>ID</TD>" Response.Write "<TD>F_TITLE</TD>" Response.Write "<TD>F_MEMO</TD>" Response.Write "<TD>WriteTime</TD>" Response.Write "</TR>" 'お約束のEOFまでループは(データが無くなるまでループ)、 Do While rs.EOF = False 'レコードセットの.EOFがFalseの間 Response.Write "<TR>" '内容を表示する Response.Write "<TD>" & rs.Fields.Item("ID") & "</TD>" Response.Write "<TD>" & Server.HTMLEncode(rs.Fields.Item("F_TITLE")) & "</TD>" Response.Write "<TD>" & Server.HTMLEncode(rs.Fields.Item("F_MEMO")) & "</TD>" Response.Write "<TD>" & rs.Fields.Item("WriteTime") & "</TD>" Response.Write "</TR>" '次のレコードにポインタを移動する rs.MoveNext 'これを忘れると悲惨なことに、、、 Loop Response.Write "</TABLE>" 'テーブルは終わりです '開いていたレコードセットを閉じる rs.Close 'データベースも閉じようよ db.Close 'お行儀よくオブジェクトも開放しましょう(通常は自動的に解放されるけど) Set db = Nothing %> <hr> 終了です。<br> </body> </html>

広告

リンク広告
  1. --[Windows 自動ログイン control userpasswords2 や netplwiz]
  2. --[ Windows10 OSのフルバックアップ システムイメージバックアップ]



Googleで関連項目を検索する

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

Google

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



リンク 三流君 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]← あまり更新してないけど・・・
[永遠の下書き日記?]← 恥ずかしいのであまり載せてないけど・・・
[ひとりで掲示板?] ←一人で?掲示板?ぉぃぉぃ


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






現在時刻は、2017/05/28 17:25:33です。