==ASP== Part 3
■ このスレッドは過去ログ倉庫に格納されています
0001nobodyさん
03/07/28 23:07ID:33/XGu54【過去スレ】
==ASP== Part 2
http://pc2.2ch.net/php/kako/1028/10280/1028024916.html
==ASP==
http://pc.2ch.net/php/kako/984/984840107.html
0598nobodyさん
04/10/22 19:34:02ID:4aYaveIP動的な折れ線グラフを出力したいのですが
まずどうしていいのか分からないので
どうぞ一つよろしくお願いします。
0599nobodyさん
04/10/22 21:35:58ID:???まず入力された数値をオウム返しに表示するページを作りんさい。
絵(グラフ)を描くのは適当にコンポーネント探しんさい。
オーバースペックで良ければImageMagickとかあるし。
0600nobodyさん
04/10/23 22:42:20ID:???http://support.microsoft.com/default.aspx?scid=kb;ja;323750
http://support.microsoft.com/default.aspx?scid=kb;ja;184619
0601nobodyさん
04/10/25 03:06:17ID:rJW5BvWS（たとえば、hoge://hoge.hoge.cgi?aaa=123&bbb=456 → hoge://hoge.hoge.cgi/123/456.html）
同様のことがASPでもできるんでしょうか？
0603nobodyさん
04/10/25 09:17:19ID:lryWe8IGさんきゅー。でもリンク先が４０４＿|￣|○
0604nobodyさん
04/10/25 14:38:39ID:???ttp://web.archive.org/web/20040224002756/http://program.station.ez-net.jp/products/isapi/URLParamFilter/index.asp
0605602
04/10/26 00:17:10ID:???未確認でスマンかった。
↓になってるみたいだね。
ttp://program.station.ez-net.jp/products/isapi/URLParamFilter/v1.1/
0607nobodyさん
04/10/26 10:30:57ID:???javaスクリプトで制御できるのかと思ったのですが、ググってみると出来ないという回答しか見つかりませんでした。
お願いします。
0608nobodyさん
04/10/26 10:42:13ID:???ASPでどうこうできる話ではないぞ。
0609597
04/10/26 12:06:52ID:o98NDTMbありがとうございます。
早速試してみたのですが
-2147463156
ディレクトリのデータ型と、ネイティブ DS のデータ型を相互に変換することはでき
ません
Active Directory
とエラーが出てしまいます。
立て続けで申し訳ないですが、教えてください。
お願いいたします。
0610nobodyさん
04/10/27 01:16:53ID:???その後で必要に応じて値を変更してるんだが、
IIS 6.0 でアクティブな ASPセッションが何もない状態
（Abandonしたりタイムアウトして生きてるセッションがなくなった状態）
が続くと、いつの間にかアプリケーション変数が初期値に戻っている。
IIS 5.0 では同じコードでもそういう現象はなかったんだが、
メタベースかどこかの設定を変えてやる必要があるんだろうか。
0611nobodyさん
04/10/27 23:37:14ID:???一番上にある、アイドル時間の監視（20分でプロセス終了）をやめたら
解消しますた。
0612nobodyさん
04/10/28 22:11:44ID:???基本的にはできないけど、銀行とかのログインサイトで使用されているメジャーな方法としては
フレームを使ってフレーム内でページ遷移させるようにする。
フレームのHTMLにonUnloadイベントをつけて、ログアウト処理を行うaspに飛ばす
こうするとブラウザの閉じるボタンを押した場合も、別サイトに飛んだ場合もログアウト処理が走る。
但し流行りのタブブラウザの場合は、閉じるボタンを押すとonUnloadが働かないので注意
0613ASP素人
04/11/01 03:30:19ID:sStej03s'----- DBにデータを追加
'=================================================
Sub UpdateDB()
StrSQL = "insert into member ("
StrSQL = StrSQL & " name "
StrSQL = StrSQL & " mail "
StrSQL = StrSQL & ") values ("
StrSQL = StrSQL & "'" & name & "',"
StrSQL = StrSQL & "'" & mail & "'"
StrSQL = StrSQL & ")"
ObjConn.Execute(StrSQL) （←この行が違うといわれるのですが・・・）
If Err = 0 Then
End If
End Sub
アドバイスくらはい
0615nobodyさん
04/11/01 09:29:17ID:???>StrSQL = StrSQL & " mail "
カンマ入れなくて良いの？
0616nobodyさん
04/11/01 12:41:32ID:???そこは列名だからカンマ要らないっしょ。
とりあえず613は「違うと言われる」という内容のエラーメッセージを
表示されたそのまんまコピペしる。でないとわからん。
0617616
04/11/01 12:42:30ID:???てことで>615でいけそうですな。
0618ASP素人
04/11/01 18:48:33ID:ZGzcf1yoエラー タイプ
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] INSERT INTO ステートメントの構文エラーです。
/scripts/id.asp, line 176
0619ASP素人
04/11/01 18:51:14ID:ZGzcf1yoDimObjConn,ObjRS
中略
'=================================================
'----- DBに接続
'=================================================
Sub ConnDB()
'スクリプトと同じフォルダにあるAccessのpass.mdbに接続します。
DBName="Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & _
Server.Mappath("pass.mdb")
Set ObjConn = Server.CreateObject("ADODB.Connection")
ObjConn.open DBname
StrSQL = "select * from pass"
Set ObjRS = Server.CreateObject("ADODB.Recordset")
ObjRS.Open StrSQL, ObjConn,3,3
End Sub
0620615
04/11/01 21:51:00ID:???念のため書くけど,SQLステートメント(この場合はStrSQL内)に間違いがあると,
ObjConn.Execute(StrSQL)の行を実行するときににエラーが出るのよ.
0621nobodyさん
04/11/01 22:58:41ID:???いや、616は、617に書いた通り漏れの勘違いカキコ。
実際貼ってもらったエラーの文言からしても、615の指摘が的を射てるっぽいね。
ってことで、615の修正は試してみた?
0622nobodyさん
04/11/02 00:42:10ID:???SQL文をそのまま書くのは間違えやすい（特に「'」とか）し、パフォーマンスも若干落ちるので
Recordset出してAddnew()したほうがいいよ。
0623nobodyさん
04/11/02 05:50:58ID:XVal7AaO116は無視して115の言うとおりカンマ入れろ。
>>622
Response.Write StrSQL するなりしてちゃんとチェックすれば無問題。
むしろRecordSet使うほうがパフォーマンス悪いﾖｶﾝ。
クエリの実行でエラーになったときのデバッグの基本は
１．Response.Write StrSQL して目視チェック。
２．Response.Writeの結果のSQL文をクエリ実行環境(SQL Serverの場合はクエリアナライザ、
アクセスの場合はクエリ作成→左上のアイコンをプルダウンして「SQL」を選んだ状態)
でコピペ →実行！ →エラー内容を見る
でつ（・∀・）！
0624ASP素人
04/11/02 09:18:41ID:WxKWacb6カンマはどこに入れればよろしいのでしょうか？
0625nobodyさん
04/11/02 10:14:58ID:???insertの構文を見直してみよう。特に列の所。
0626nobodyさん
04/11/03 01:07:15ID:???つーか、ちゃんと基礎からＳＱＬの勉強しようZe!
「お勉強ページ 勝手にリンク まとめサイト」スレより「SQL/DB」関連のリンク
http://program2ch.jugem.cc/?cid=14
0627nobodyさん
04/11/03 03:04:22ID:Fscx21N8・・・ってまだ早いかｗ
0628OpenTextFile
04/11/03 17:34:39ID:pUiAD0wAブラウザ（ＩＥ）で実行すると固まった状態になります。
どのようなことが考えられますか？
また、タイムアウトなりおこしてエラーとか出力する方法はないの
でしょうか？
ーーーーーーーーーーーーー以下スクリプトーーーーーーーーーーー
<% LANGUAGE=VBScript
DIM obj
DIM fo
Set obj=Server.CreateObject("Scripting.FileSystemObject")
Set fo=obj.OpenTextFile(Server.Mappath("text1.txt"),1,True)
Response.Write fo.ReadLine
fo.Close
Set fo = Nothing
Set obj = Nothing
%>
0629nobodyさん
04/11/03 20:19:59ID:???とりあえず、4行目のServer.Mappathがちゃんと目的のファイルのパス返してるかどうか、
そっから下のコードをコメントアウトして確認してみては。
あと、それだと一行読んで表示して終わりだけどそれで合ってるの?
ひょっとしてループのコード削ってカキコしてない? だとしたらループの終端条件も
チェックしてみませう。
0630nobodyさん
04/11/03 22:24:22ID:???InetMgr > 仮想ディレクトリのプロパティ > ディレクトリタブ > アプリケーションの設定欄 > 構成ボタン > デバッグタブ
デバッグのフラグ: 両方にチェック
スクリプトのエラーメッセージ: 上を選択
とりあえずこの設定をすればブラウザでエラーを拾える
0631nobodyさん
04/11/03 22:25:23ID:???0632nobodyさん
04/11/04 02:05:45ID:???まず、固まった状態とは何がどう固まっているの？
IEが反応しなくなって強制終了するしかなくなるってこと？
それともサーバから何も帰らないってこと？
0634nobodyさん
04/11/04 17:06:47ID:???0637nobodyさん
04/11/05 16:04:56ID:???使用者がパスを入力したときにサーバ側でパスから日付を複合化して
Date()と比較して合ってれば、ある処理をさせるようなスクリプトを考えてます。
MD5のような堅固な暗号じゃなくて構わないので、可逆的な暗号を作成する方法を
説明しているサイトとかあるかな？
今自分で考えているのは、許可する日付８桁に四則演算してやって・・・・
と考えていましたが、どうも上手くまとまらないんだYO
たすけて偉い人
0638nobodyさん
04/11/05 21:17:16ID:???0639nobodyさん
04/11/05 21:18:51ID:???0640nobodyさん
04/11/11 06:15:19ID:TWFMGtp50641nobodyさん
04/11/11 15:45:27ID:???0642nobodyさん
04/11/12 19:52:42ID:qd5J7hVzﾃｷｽﾄﾌｧｲﾙに1行ずつ
aaa
bbb
ccc
・
・
・
xxx
yyy
zzz
という文字列の記述があって、
あるaspﾌｧｲﾙにｱｸｾｽする度に、上記ﾃｷｽﾄﾌｧｲﾙを上から1行ずつ読み込み、
かつ読み込んだ文字列をﾃｷｽﾄﾌｧｲﾙから削除する動作をさせたいんです。
どなたか教えて下さい。
0643nobodyさん
04/11/12 21:41:52ID:???1. FileSystemObjectの使い方は知っていますか?
2. 何か、自分の使える言語で「テキストファイルに対する一般的な操作」は書けますか?
1. 2. に「はい」と答えられるなら自ずから問題は解決するはずです。
どちらかが「いいえ」なら、書籍、Web、MSDNのヘルプなどで勉強してください。
(今勉強しておけば、この先ASPでファイルを操作するときに困ることは格段に減ります。)
0644nobodyさん
04/11/12 22:44:39ID:???var fs = Server.CreateObject("Scripting.FileSystemObject");
var FILE = "C:\\test.txt";
with (fs.OpenTextFile(FILE,1)) {
Response.Write(ReadLine());
var wMSG = "";
while (!AtEndOfStream) { wMSG += ReadLine(); }
Close();
}
with (fs.OpenTextFile(FILE,2)) {
Write(wMSG);
Close();
}
0645nobodyさん
04/11/13 04:47:00ID:???vbscriptやhtml、javascriptを効果的に見分けられるような
エディタがあるんですかね。
0646nobodyさん
04/11/13 06:38:48ID:???俺はサクラエディタ使ってるけど。
0647nobodyさん
04/11/13 07:16:18ID:???■■■：FFFFFF
っていう感じで■３つを色コードFFFFFF（白）で表示ってのを
今は作ってあり、今はFFFFFFを直接書き換えて右端に更新ボタンを作ってあり
更新する事により色コードをチェック後DBを更新して■の色も
更新するように作ってあります。
ASPとはほとんど関係ない事ですが、クライアントから■をクリックしたら
別ウィンドウが開いて色の一覧が出て、選択して閉じるボタンを押すと
選択した色が選ばれているような感じにしてくれと言われたのですが、
ペイントみたいな感じは個人的にさけたいのですが、
見栄え的に何か良い方法、もしくは同じような事をやられた方、見えないでしょうか・・
内容的にはWEB商品の色を選ぶみたいな処理なんですが。
処理的には思い浮かぶのですが、IEで色選択をさせるってのを
画面として作った事がないのであえて質問させてもらいました。
よろしくお願いします。
0649462
04/11/13 13:29:20ID:tao/R1VF1…何となくですが、基本的な事ならできると思います。
2…JavaScriptしかできませんが、一般的な操作はできてると思います。
ｽｲﾏｾﾝ、本当始めたばかりで右も左も分かりませんが、色々と勉強中です。
頑張って、軽くて負荷の少ない記述とか、ｾｷｭﾘﾃｨｰも考慮した記述などができる様になりたいです。
>644さん
具体的な記述、ありがとうございます！
最初のwhileﾙｰﾌﾟ内にあるReadLineを、ReadAllに書き換えたら、期待通りの動作をしました。
あと644さんの記述で、withの使い方を覚えました。
本当に助かりました。
0650643
04/11/13 13:52:14ID:???罪滅ぼしに一つサイト紹介。知ってたらまたまたスマソorz
ttp://www.imasy.or.jp/~hir/hir/tech/js.html
ASPをJScriptで書くときに気を付けた方がよいポイントとかあるのでマジお勧め。
/* ちなみに「TIPS編」は目次準備中とあるが中身はちゃんとあるのでちうい。 */
0651nobodyさん
04/11/13 15:55:16ID:tao/R1VFいえいえ。
FSOって基本なのに、かなり上っ面なぞっただけで理解した気になってたんで、改めて教科書を読み直すきっかけになりました。
それにJScript解説のページ、すごく参考になります。
VBScriptはよく分からないので、こういうページはありがたいです。
ところで、また分からない所が出てきてしまいました。
落としてきたVBScriptで書かれたｿｰｽの中に、自作でJScriptの記述を入れて、
そのJScriptの記述からVBScriptをﾌｧﾝｸｼｮﾝとして呼び出そうとしているのですが、
上手く動作しません。
ちなみにVBScriptの部分は、お金にからむ処理が記述してあるので、その部分をJScriptで書き直せってのは勘弁して下さい(T_T)
今失敗している記述はこんな感じです。
<SCRIPT LANGUAGE="JScript" runat="Server">
var hensu = new String(Request.Form("hensu"));
if(hensu != "undefined"){ FUN()}
</script>
<SCRIPT LANGUAGE="JScript" runat="Server">
function FUN(){
</script>
<%
response.write("FUNファンクションに入った<p>")
VBで色々と記述
%>
<SCRIPT LANGUAGE="JScript" runat="Server">
}
</script>
650で教えて頂いたｻｲﾄも参考に調べているのですが、今日18時までに、ある程度形にしないと怒られるんです。（休日出勤の為）
申し訳ありませんが、宜しくお願いします。
0652642
04/11/13 15:57:17ID:tao/R1VF上の書き込み、642です
0653nobodyさん
04/11/13 17:04:15ID:???<% @LANGUAGE = JScript %>
<!-- 上はページの先頭行(<html>開始タグよりも前)に書くこと -->
必要なHTML部分を記述
<%
// デフォルトスクリプト言語をJScriptにしたので、scriptタグで
// JScriptのコードを囲まなくても、<%～%>で代用できる
// むしろ、scriptタグで囲んでしまうと、JScriptコードから
// VBScriptのプロシージャを呼べないっぽい
var hensu = new String(Request.Form("hensu"));
if(hensu != "undefined"){ FUN()}
%>
<!-- <SCRIPT LANGUAGE="JScript" runat="Server">
function FUN(){
</script>
<%
↑ではなく、こう↓する-->
<SCRIPT LANGUAGE="VBScript" runat="Server">
Function FUN()
response.write("FUNファンクションに入った<p>")
VBで色々と記述
End Function
</script>
<!--
%>
<SCRIPT LANGUAGE="JScript" runat="Server">
}
</script>
-->
0654nobodyさん
04/11/13 17:52:27ID:???function FUN() {
Response.Write "FUNファンクションに入った<p>"
'VBScriptで色々と記述
}
</script>
<script language="JScript" runat="Server">
if ((Request.Form("hensu").Item()) != "") { FUN(); }
</script>
0655654
04/11/13 17:58:14ID:???>>651
3行目の FUN() に 「;」 がない
JScriptからVBScriptの関数を呼び出す場合はVBScriptの関数を先に定義しておく必要があったような気がする。
漏れもJScript+レガシASP使い。
ここお勧めだから参考にするといいよ。
http://homepage3.nifty.com/aya_js/wsh/wsh202.htm
http://homepage3.nifty.com/aya_js/wsh/index.htm
0656nobodyさん
04/11/15 14:41:40ID:50MlQxDcありがとうございます。
土曜日は、残念ながら上からの指示で、全部VBScriptで書くことになってしまいました。
せっかく具体的な記述を頂いたのに、申し訳ありません。
ただ、僕が基本的にJScriptを使っているので、また教えて頂いた記述を使う機会があると思います。
テキストで保存させて頂きました。
で、今日は今日で、新しい壁にぶつかっているのです…。
formから送られた内容を受け取り、変数に代入したら、１度目はいいのですが、それ以降ﾌﾞﾗｳｻﾞの更新をかけても、変数の内容が空にならないんです。
<% Response.Buffer = true
A = Request.Form("A")
%>
<html><head><title>フォームの練習</title><body>
<meta http-equiv="Content-Type" content="text/html; charset=SHIFT_JIS">
<FORM action="./renshu_form.asp" method="POST">
Aを入力して下さい<br>
<INPUT type="text" name="A" size="30" maxlength="32"><br>
入力内容が正しければ、サブミットボタンを押して下さい<p>
<input type="submit">
</FORM>
<%
If A <> "" Then
Response.Write("ifに入った<br>")
End If
%>
これだと、２回目以降、常に変数Aに前回の値が入っているので、必ずif節に入ってしまいます。
また、更新をかける度に「情報を再送信しないと、ﾍﾟｰｼﾞを更新できません」という警告が出るのですが、以前formを使った記述を書いた時は、こんな警告は出なかったように思うのですが…。
申し訳ありませんが、またご教授お願いします。
0657ASP素人
04/11/15 18:41:13ID:wubhQkHVみなさんに教えてもらったとおりやってみたのですがだめでした。
カンマ入れたりしても・・・・・・
'=================================================
'----- DBに接続
'=================================================
Sub ConnDB()
'スクリプトと同じフォルダにあるAccessのdb1.mdbに接続します。
'DBName="Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & _
'Server.Mappath("member.mdb")
Set ObjConn = Server.CreateObject("ADODB.Connection")
ObjConn.Mode = 2
ObjConn.open "member" 'DBName
StrSQL = "select * from member"
Set ObjRS = Server.CreateObject("ADODB.Recordset")
ObjRS.Open StrSQL, ObjConn
'Response.Write ObjRS.Fields("name")
'Response.Write ObjRS.Fields("mail")
End Sub
'=================================================
'----- DBにデータを追加
'=================================================
Sub UpdateDB()
ObjRS.AddNew
ObjRS.Fields("name") = name
ObjRS.Fields("mail") = mail
ObjRS.Update
End Sub
で、結局こういう状況です
0658ASP素人
04/11/15 18:42:23ID:wubhQkHV現在の Recordset は更新をサポートしていません。
プロバイダか、選択されたロックタイプの限界の可能性があります。
となっていますが、神様、教えてください
0659nobodyさん
04/11/15 22:05:55ID:???通りすがり、かつASPの事はそれほど詳しくないのだけど…
> ObjRS.Open StrSQL, ObjConn
ロックタイプを指定しない場合、既定では読み取り専用のはずだけど。
Openメソッドの第4引数に適切なロックタイプを設定すればいいのでは?
0660nobodyさん
04/11/15 23:12:36ID:???＞ObjConn.open "member" 'DBName
そもそも Conection.Open メソッドに "member" ちうテーブル名だかmdbファイル名だか分からない
ものを渡しているのが気になるのだが。
とりあえず >659 氏の仰るとおり既定のロックタイプは 1(adLockReadOnly) なので、
第四引数に 3(adLockOptimistic) か 2(adLockPessimistic) を指定しよう。
ObjRS.Open StrSQL, ObjConn, ,3
みたいに
0661ASP素人
04/11/16 11:27:18ID:Dc5bDdUYで先には進んだわけなのですが、
'=================================================
'----- DBにデータを追加
'=================================================
Sub UpdateDB()
ObjRS.AddNew
ObjRS.Fields("name") = name
ObjRS.Fields("mail") = mail
ObjRS.Update （←ここでエラー）
End Sub
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 更新可能なクエリであることが必要です。
とでます。
もうすこしみたいなのでよろしくお願いします。
0662nobodyさん
04/11/16 11:49:07ID:???そもそも更新可能なレコードセット作れたっけ?
一辺、単純にUPDATE文投げてみそ。
0663615
04/11/16 13:43:40ID:???主キーが存在しますか？
Accessのテーブルは主キーがないと更新できないらしいです。
0664660
04/11/16 21:43:12ID:???VBScript で以下の文を実行したらちゃんと走ったから、ODBCのせいでも主キーのせいでもない模様。
ASP は環境作るのめんどいからパス。
時に、objRS とか name ってどこで宣言してるの?まさか局所変数だったりして…
objRS や objConn を別のサブルーチンで Close してたり、 "SELECT FROM ～" の ～ を
mdb名と勘違いしてたり、objRS が Applcation 変数だったり…
前提
ADOX で JET4.0 の hoge.mdb を作成し、 ADODB.CONNECTION を刺して
connection.execute メソッドで以下の 2つの SQL 文を投入。
CREATE TABLE hoge( id INTEGER , name TEXT(25) );
INSERT INTO hoge VALUES(2, 'mumumu');
--------------------
set c = createobject("adodb.connection")
set r = createobject("adodb.recordset")
c.mode=2
c.open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=c:\hoge.mdb"
r.open "select * from hoge", c,,3
r.addnew
r.fields("id") = 4
r.fields("name") = "mamama"
r.update
c.execute "UPDATE hoge set name='mimimi' where id=2"
c.execute "insert into hoge values(5,'momomo');"
r.close
c.close
set r = nothing
set c = nothing
----------------
0665nobodyさん
04/11/16 21:44:53ID:???> 更新をかける度に「情報を再送信しないと、ﾍﾟｰｼﾞを更新できません」という警告が出るのですが、
POSTで送っているから。
更新すると Request.Form("A") の内容もまた送られてしまうため、Aが空にならないんだと思う。
0667660
04/11/16 21:47:31ID:???確認してみれ。ASPの実行ユーザが変えられていたら、そのユーザが mdb を変更できるか。
0669615
04/11/17 15:06:19ID:???>時に、objRS とか name ってどこで宣言してるの?まさか局所変数だったりして…
漏れももしやとは思ったのだが、エラーメッセージがそれらしく出力されてるから
グローバルになってるのかとおもたのだよ。
ASP素人氏には各変数をどこで定義しているか聞きたい。
0670ASP素人
04/11/17 21:41:41ID:87XfvWNx<%
DimObjConn ,ObjRS
'パラメータを取得します。
name = Request.Form("name")
mail = Request.Form("mail")
act = Request("act")
'デフォルトページを登録画面に設定します。
if act = "" then
act = "ent"
end if
これでしょうか？
一番初めの部分です
0671nobodyさん
04/11/18 01:45:44ID:???~~~~~~~
ここにスペースが無いのはコピペミス？
0672615
04/11/18 09:47:24ID:???>670
<% のすぐ下の行に
Option Explicit
を書き込んでみて。未定義の変数が使われるとエラーが表示されるようになるから。
既に記述していたら不要だけど。
現状では変数の有効範囲が曖昧で混乱を招いているからおながいします。
0673ASP素人
04/11/18 13:31:45ID:DA9fr5zwそれはコピペミスでしたすんません。
>>672
やりました。
そしたら
Microsoft VBScript 実行時エラー (0x800A01F4)
この変数は宣言されていません。: 'name'
/boshu.asp, line 6
と・・・・
権限は一応チェックしますた。
0674659
04/11/18 14:29:47ID:???可能なら使用している全ての変数を明示的に宣言して。
あとベタだけどAccessのメニューでテーブル[member]に書き込み権限があるか
みてください。
0675nobodyさん
04/11/18 16:25:00ID:y/ZLmA11ttp://www.geocities.jp/activex_treeview/
↑OS2000 Vbはインストールされていない端末で
ActiveXを使ったツリービューが見れないだよね。
xp や NTでは見ることが出来たんだが・・・？
どの端末もVbが入っていれば見れます。
Vbなしで見る方法ありますか？
Vbランタイムでは×
ASPスレにも書き込むけど、だれか教えて。何が必要なんだ～？？
0676615
04/11/18 18:24:49ID:???「この変数は宣言されていません」っていうエラーが消えるまで
変数を定義しる。ついでにその変数は何のために使う変数なのか
コメント入れとけばメンテが楽になるよ。まぁこの変数名なら分かるけど。
それから更新対象のテーブルの定義を書き込んでみて。
フィールド名とかデータ型の一覧。
そしてフィールド名の左隣の列に鍵マークが付いているか。
Accessならテーブル選んでデザインをクリックかなんかすれば見られる。
0677615
04/11/18 18:30:23ID:???マルチは感心せぬが。
classidをレジストリから検索したら、ツリービューコントロールは
COMCTL32.OCX
の中に入っているらしいことが判明。
対象PCにコピーしてREGSVR32.EXEで手動登録すれば動くかも。
※OSがどうなっても保証はしません。知りません。独り言です。気合いでGO!
0678659
04/11/18 21:06:15ID:???テーブル member（主キー無し）
カラム name (テキスト型 サイズ:20), mail (テキスト型 サイズ:20) 作成後、
ASP素人氏のコードを借りて IIS5.0 の環境で下記スクリプトを実行してみた。
(フォーム)
<html>
<head>
<title>Test Form</title>
</head>
<body>
<form action="test.asp" method="post">
name : <input type="text" name="name" size="20"><br>
mail : <input type="text" name="mail" size="20"><br>
<input type="submit" name="submit" value="送信">
</form>
</body>
</html>
0679659
04/11/18 21:08:46ID:???<html>
<head>
<title>ASP_TEST</title>
<%
Dim ObjConn ,ObjRS
Dim Name, Mail
Sub ConnDB()
Set ObjConn = Server.CreateObject("ADODB.Connection")
ObjConn.Mode = 2 'adModeWrite - 2 adModeReadWrite - 3
ObjConn.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};" & _
"DBQ=C:\Temp\www\member.mdb"
ObjConn.Open
StrSQL = "select * from member"
Set ObjRS = Server.CreateObject("ADODB.Recordset")
ObjRS.Open StrSQL, ObjConn,, 3
End Sub
Sub UpdateDB()
ObjRS.AddNew
ObjRS.Fields("name") = Name
ObjRS.Fields("mail") = Mail
ObjRS.Update
End Sub
%>
</head>
0680659
04/11/18 21:09:47ID:???<%
Name = Request.Form("name")
Mail = Request.Form("mail")
Call ConnDB
Call UpdateDB
ObjRS.Close
ObjConn.Close
Set ObjRS = Nothing
Set ObjConn = Nothing
%>
<h4>テーブルmemberの内容</h4>
<%
Call ConnDB
Response.Write "<table border=" & """1""" & ">"
Do Until ObjRS.EOF
Response.Write "<tr><td>"
Response.Write ObjRS.Fields("name").Value & _
"</td><td>" & ObjRS.Fields("mail").Value & "</td></tr>"
ObjRS.MoveNext
Loop
Response.Write "</table>"
ObjRS.Close
ObjConn.Close
Set ObjRS = Nothing
Set ObjConn = Nothing
%>
</body>
</html>
0681659
04/11/18 21:14:12ID:???ユーザー権限とかテーブルのアクセス権に問題が無いなら
やっぱり変数のスコープの問題かも。。。
0682ASP素人
04/11/19 12:15:43ID:LqCvowdj一応ｺﾋﾟﾍﾟして一部なおしてやってみたのですが、
エラーでがでました。
ってことはおっしゃるとおり
>ユーザー権限とかテーブルのアクセス権に問題が無いなら
やっぱり変数のスコープの問題かも。。。
ということなんでしょうかね～。
ＩＩＳ５でＸＰproの環境なのですが、
↑のユーザー権限とテーブルのアクセス権について徹底的に教えていただけますか？
0683659
04/11/19 13:12:52ID:???ので使うなら取り除かないとエラーが出るよ。
>ユーザー権限とテーブルのアクセス権について徹底的に教えていただけますか？
いや、別にそんなに難しい話じゃないのよ('A`)
ユーザー権限については>>660氏が>>667で書いてある事がどうかって事だし、
テーブルのアクセス権は、mdb作成→テーブル作成の間に「ユーザー/グループの権限」
をいじっていなければ問題は無いはずだから(Access2000の話なんでOffice XP以降のバージョンは違うかも）。
気になっていたんだけど、>>670と>>657は両方とも boshu.asp 内にあるのかね？
差し支えなければ boshu.asp のコード全部晒してみ？
それと>>615氏の言っている更新対象のテーブルの定義も。
0686615
04/11/19 16:15:11ID:???駄目ですたって何が駄目ですたの？
表示されなかったから駄目って書いたのだろうけど、
REGSVR32.EXEでの登録は成功したの？
あと一応登録後、再起動してから試してみた？
っつぅかぶっちゃけ分かんないしスレ違いなので書きたくないのだが(ォ
VisualStudio(6.0)に付いてくるDependency Walkerっつぅツールで
COMCTL32.OCXを覗くと、このファイルが使用している他のファイルのリストが
みられる。
0687nobodyさん
04/11/19 16:25:56ID:Dfi0LnleﾕｰｻﾞｰAが必要事項を記入してｻﾌﾞﾐｯﾄを押しました。
ｻｰﾊﾞ内のﾃｷｽﾄﾌｧｲﾙがopenして、入力内容を書き込んでます。
この時、ﾕｰｻﾞｰBがｻﾌﾞﾐｯﾄﾎﾞﾀﾝを押したらどうなるのでしょうか？
ﾃｷｽﾄﾌｧｲﾙをcloseする前に、open命令が出る形になるので、ﾏｽﾞｲような気がします。
もしｴﾗｰが出るようなら、解決策、もしくは皆様の対策を教えて下さい。
0688659
04/11/19 16:46:13ID:???参考になるかよーわからんけど
【How to use licensed ActiveX controls in Internet Explorer】
http://support.microsoft.com/default.aspx?scid=kb;en-us;159923
0689675
04/11/19 16:49:37ID:???すみません。
REGSVR32.EXEで登録しました。
レジストリーエディタでID検索したら
hitはしたので登録は大丈夫だと思います。
もちろん再起動もしました。でも表示されませんでした。
Dependency Walkerはこれから使ってみようと思います。
スレ違いなのは承知です。ただどこのスレに書けばいいのだろう･･･。
615氏もう少しお付き合いください。申し訳ない。
0691675
04/11/19 17:39:38ID:???まじ感動！！出来ました。かなり苦戦いたしましたが表示されるようになりました。
http://support.microsoft.com/kb/159923
ここも参考になりました。615氏もご迷惑をおかけしました。
0692nobodyさん
04/11/19 23:09:27ID:???「ファイル ロック 排他」あたりをキーワードにぐぐってみれ。
具体的にはApplication.LockとUnlockを使うことになるのかな。
0693nobodyさん
04/11/20 01:45:28ID:???Application.Lock
↓
ファイル入出力とか複数ユーザが同時にやるとヤバそうな処理
↓
Application.Unlock
0694nobodyさん
04/11/20 09:08:44ID:???http://www.microsoft.com/japan/msdn/library/default.asp?url=/japan/msdn/library/ja/jpiis/iishelp/iis/htm/asp/vbob84h7.asp
テキストファイルのロック制御はFileSystemObjectが勝手にやってくれてるものだと思ってるんだが…
その辺詳しい人いる？
0695ASP素人
04/11/20 10:10:40ID:+ocqxxRzOption Explicit
DimObjConn,ObjRS
'パラメータを取得します。
name = Request.Form("name")
mail = Request.Form("mail")
act = Request.Form("act")
'デフォルトページを登録画面に設定します。
if act = "" then
act = "ent"
end if
'登録確認画面でエラーチェックをします。
if act = "entconf" then
flg_err = ""
if name = "" then
flg_err = "name"
end if
if mail = "" then
flg_err = "mail"
end if
end if
'エラーがある場合はエラー表示画面に移動させます。
if flg_err <> "" then
act = "err"
end if
0696ASP素人
04/11/20 10:11:45ID:+ocqxxRz'HTML表示処理開始
'=================================================
%>
<% Call ConnDB'DBに接続します。 %>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=x-sjis">
<title>メンバー募集フォーム</title>
</head>
<body>
<h2>メンバー募集フォーム</h2>
<%
'-- ページ内容の表示
Select Case act
Case "entconf"'登録確認
Call Gamen_entconf
Case "kan"'処理完了
Call Gamen_kan
Case "err"'エラー
Call Gamen_err
Case else
Call Gamen_ent
end select
%>
</body>
</html>
<%
Call CloseDB
0697ASP素人
04/11/20 10:13:41ID:+ocqxxRz'----- 登録画面
'=================================================
Sub Gamen_ent( )
%>
<form method="POST" action="boshu.asp">
<table border="1">
<tr>
<td>お名前</td>
<td><input type="text" name="name"></td>
</tr>
<tr>
<td>メールアドレス</td>
<td><input type="text" name="mail"></td>
</tr>
</table>
<input type="hidden" name="act" value="entconf">
<input type="Submit" name="sub" value="確認">
<br>
</form>
<%
End Sub
■ このスレッドは過去ログ倉庫に格納されています