VB.NET質問ｽﾚ (Part12)

1 名前：前スレ972 [2005/07/17(日) 20:33:58 ] VB.NETの質問全般です 過去スレ VB.NET質問ｽﾚ (Part11) pc8.2ch.net/test/read.cgi/tech/1114217190/ VB.NET質問ｽﾚ (Part10) pc8.2ch.net/test/read.cgi/tech/1109343613/ VB.NET質問ｽﾚ (Part9) pc5.2ch.net/test/read.cgi/tech/1106577850/ VB.NET質問ｽﾚ (Part8) pc5.2ch.net/test/read.cgi/tech/1102512868/ VB.NET質問ｽﾚ (Part7) pc5.2ch.net/test/read.cgi/tech/1096683017/ VB.NET質問ｽﾚ (Part6) pc5.2ch.net/test/read.cgi/tech/1088812165/ VB.NET質問ｽﾚ (Part5) pc5.2ch.net/test/read.cgi/tech/1078134703/ VB.NET質問ｽﾚ (Part4) pc2.2ch.net/test/read.cgi/tech/1065269043/ 【老若】VB.net質問ｽﾚ【男女】 (Part3) pc5.2ch.net/tech/kako/1056/10562/1056281084.html 【老若】VB.net質問ｽﾚ【男女】 (Part2) pc2.2ch.net/tech/kako/1043/10436/1043629429.html 【老若】VB.net質問ｽﾚ【男女】 pc2.2ch.net/tech/kako/1025/10258/1025848458.html 206 名前：デフォルトの名無しさん mailto:sage [2005/08/13(土) 01:33:25 ] >>204 「とあるラベルの色を指定するプロパティ」で、値を別フィールドにとっておいて イベントで独自色を使用してるかどうか判断すればいいだろ。 プロパティブラウザ？　気にするな。 気になるのならParentChangedでParentのBackColorとForeColorに合わせるようにするとかどうだ。 >>205 Onの方はProtectedなメソッドなので継承したクラスでオーバーライドするしかない。 そのかわり基底クラスのイベントを多少コントロールできる。 派生コントロールを作らないのならOnをいじる機会はない。 派生コントロールを作るのならデリゲートオブジェクトを作らないのでOnをオーバーライドする方が多少効率的。 207 名前：デフォルトの名無しさん mailto:sage [2005/08/13(土) 03:30:00 ] 教えてください。 関数の中には、引数を指定しない場合、デフォルトの値が適用されるものがありますが、 これを自分で作成した関数で再現する場合、どのようにすれば良いのでしょうか 例えば↓で、bolFlag が指定されていないときは、True を指定したい Public Function MyModule(Byval strData As String, Byval bolFlag as Boolean) As String 　　... End Function 208 名前：デフォルトの名無しさん mailto:sage [2005/08/13(土) 03:33:55 ] ヘルプで調べると良いよ Visual Basic 言語リファレンス 209 名前：デフォルトの名無しさん mailto:sage [2005/08/13(土) 04:22:36 ] Optional ByVal bolFlag As Boolean = True ですね。 ありがとうございました。 210 名前：204 mailto:sage [2005/08/13(土) 13:37:52 ] >206 重ねてのアドバイスありがとうございます。 OnForeColorChangedと、その追加したプロパティのセッターで コントロール自体の色と一致しているかを保存しておき、 一致している場合のみ連動させるようにしました。 今のところ意図した動きになっているようです。 211 名前：デフォルトの名無しさん mailto:sage [2005/08/13(土) 17:27:56 ] 追加で自己レス ShouldSerialize[プロパティ名]を利用することで、 プロパティブラウザでコントロールの色と同じであれば 太字にならない（＝ソースに色指定が出力されない） ようになりました。 212 名前：デフォルトの名無しさん mailto:sage [2005/08/13(土) 21:29:40 ] 質問です。 グローバルＩＰアドレスを取得したいのですが、どうすればよいでしょうか？ ttp://dobon.net/vb/dotnet/internet/dnslookup.html このページの方法では、ＬＡＮやルーターから割り振られたアドレスしか取得できないので。 213 名前：デフォルトの名無しさん mailto:sage [2005/08/13(土) 22:14:57 ] 　　　〃∩ ∧＿∧ 　　　⊂⌒（ 　・ω・）　　はいはいわろすわろす 　　　　 ｀ヽ_っ⌒/⌒ｃ 　　　　　　　 ⌒ ⌒ じゃかわいそうなのでマジレス。 内側だけで直接グローバルIPを見ることはできない。 たぶんDiCEみたいなDDNS更新ツール （それかネットワークゲーマー用のユーティリティ？）を作りたいんだと思うけど、 やるなら外のページを定期的に見に行って、環境変数のREMORT_ADDRを 取得して比較するくらいしか方法ないと思う。 せめてルータが決めうちできれば、コマンドでの取得できそうだけどね。 214 名前：デフォルトの名無しさん mailto:sage [2005/08/13(土) 22:17:54 ] ギャース、REMOTE_ADDRだった。 逝ってきます・・・。 215 名前：デフォルトの名無しさん mailto:sage [2005/08/14(日) 10:27:19 ] DataGridで、カラムを複数行にする方法はありませんか？ テーブル：項目１，項目２，項目３，項目４，項目５ みたいなのを 項目１｜項目２｜項目３ 　　　　　｜項目４｜項目５ みたいな感じに表示させたいです。 よろしくお願いします。 216 名前：デフォルトの名無しさん mailto:sage [2005/08/14(日) 13:18:42 ] SELECT 項目1,項目2,項目3 FROM HOGE UNION SELECT NULL,項目4,項目5 FROM HOGE 217 名前：215 mailto:sage [2005/08/14(日) 21:31:19 ] >>216 ありがとうございます。 やってみたのですが、データの中身は2段になったのですが、項目名称が2段にならなかったです。 項目名称は1行しか無理でしょうか。 218 名前：デフォルトの名無しさん mailto:sage [2005/08/15(月) 10:31:59 ] CheckBoxにReadOnlyプロパティを追加したユーザコントロールを 作ろうとしています。 イメージとしては、チェックボックスがEnabled=Falseの状態、 文字列は通常のままにしたいのですが、 何かいい方法はありませんでしょうか？ できればCheckBoxを継承して作成したいのですが。 219 名前：デフォルトの名無しさん mailto:sage [2005/08/15(月) 10:39:17 ] CheckStateプロパティと、OnCheckStateChangedメソッドのオーバーライドでいいんじゃね？ 220 名前：デフォルトの名無しさん [2005/08/15(月) 13:21:55 ] >>217 SELECT 項目1,項目2,項目3 FROM HOGE UNION SELECT NULL,'項目名4','項目名5' UNION SELECT NULL,項目4,項目5 FROM HOGE てか、たぶんあなたのやりたいことは無理です。 221 名前：デフォルトの名無しさん mailto:sage [2005/08/15(月) 17:23:25 ] vb.net（プログラム自体も・・・）始めたばかりのピヨピヨです。 いろいろ調べたんですがどうしても解らないことがあります。 質問してもいいですか？ 222 名前：デフォルトの名無しさん [2005/08/15(月) 17:25:13 ] VB6のころはテキストボックスのGotFocusでテキストを 全選択するのが良く行われてましたけど、VB.NETでは これはできるのでしょうか？ 単純にGotFocusでSelectAllメソッドを使ったのでは できないようなのですが。 もともと、これは好きじゃないのですが、業務アプリの 慣習というのがあるんですよね。できない、かなり難しい というのであれば、上の人を説得できるので。 223 名前：デフォルトの名無しさん mailto:sage [2005/08/15(月) 17:42:13 ] ん？　普通にできるけど？ ちなみに.NETではGotFocus/LostFocusよりもEnter/Leaveが推奨されている。 224 名前：デフォルトの名無しさん mailto:sage [2005/08/15(月) 17:45:07 ] >222 私もあまり好きじゃないのですが、同じく業務アプリ屋なので・・・。 VB.netの場合、EnterとLeaveで出来ます。 もしクリックした場合も全選択させたいなら、MouseDownも。 （うちはマウスクリックの場合は全選択させません） ちなみに、Enterでもタブ移動させたいって言われてませんか？ｗ 225 名前：デフォルトの名無しさん mailto:sage [2005/08/15(月) 19:39:32 ] 妙なこと言う人たちだなあ。。 それって好き嫌いの問題か？ フォーカス移動時の全選択って合理性あるでしょ。 テキストエディタのように既存の文字列を編集する、ってアプリならともかく、 ほぼ毎回入力されるデータが変わる、っていうようなアプリなら。 だいいち、客に出すラーメンの味にラーメン屋自身の好みを押し付けるって不遜じゃないか。 226 名前：デフォルトの名無しさん mailto:sage [2005/08/15(月) 19:54:41 ] なんでそんなことでケチつけるかなぁ？ 個人的に好きじゃないことの何が悪い？ 意固地になって実装しないわけじゃないし。 注文されればその通りに作ってるさ。 227 名前：デフォルトの名無しさん [2005/08/15(月) 19:58:31 ] >225 コボラー乙 228 名前：最凶VB厨房 mailto:sage [2005/08/15(月) 20:58:20 ] こだわりのラーメンは是非食いたいネ あー腹減った。 229 名前：デフォルトの名無しさん [2005/08/15(月) 23:05:29 ] TcpClient で存在しないアドレスにconnectすると、 えらい時間が掛かってExceptionが返ってくるのだけど、 connectのタイムアウトを設定ってできないの？ 230 名前：デフォルトの名無しさん mailto:sage [2005/08/15(月) 23:40:07 ] できない。 別スレッド作るかSystem.Timers.Timerを使うかして、そっちで強制的にCloseするぐらいか。 でもTcpClientでは接続中かどうかを判断もできないんだよね。.NET 2.0で思い出したように追加されたけど。 派生クラスを作ればProtectedメンバのClientプロパティ経由で状態を知ることはできるんだが。 派生クラスでタイムアウト付きConnectでも定義するか。 素直にSocket使った方が早いかもね？ 231 名前：デフォルトの名無しさん mailto:sage [2005/08/16(火) 00:01:14 ] >>230 粗雑な問いに、丁寧にお答えいただき、大変恐縮でございます。 ご意見、参考にさせて頂きます。ありがとうございました。 232 名前：デフォルトの名無しさん [2005/08/16(火) 09:03:51 ] >>224 Enterイベントだとタブでの移動では全選択されるようなのですが、 マウスでクリックした場合は全選択されないですよね？ Clickイベントで実装するとテキストボックス内で他の場所を クリックしたときにも全選択されてしまうし。 233 名前：デフォルトの名無しさん mailto:sage [2005/08/16(火) 10:36:43 ] >232 いや、だからMouseDown >テキストボックス内で他の場所 これってどういう意味ですか？ 234 名前：デフォルトの名無しさん mailto:sage [2005/08/16(火) 11:20:26 ] >>232 >Enterイベントだとタブでの移動では全選択されるようなのですが、 >マウスでクリックした場合は全選択されないですよね？ いや、実際は一旦全選択されているはずだけれどもね。 恐らく一旦全選択された後、解除されてしまうんだよね。 単にクリックしたはずが、クリックしたついでに微妙にドラッグになってしまっているために。 >>233 だいたい話の文脈でわかるでしょ？ そうでないならこの話題にのっかる資格はないと思うけど。 フォーカスが来たとき以外も全選択されてしまうということでしょう。 235 名前：デフォルトの名無しさん mailto:sage [2005/08/16(火) 11:57:37 ] >234 >恐らく一旦全選択された後、解除されてしまうんだよね。 これはあってる。 >単にクリックしたはずが、クリックしたついでに微妙にドラッグになってしまっているために。 これはちがう。単なるクリックでも全選択は解除される。 イベントハンドラの発生順の問題。 もし微妙にドラッグしちゃった時でも全選択させたいならMouseUp。 フォーカスが元々ある状態の場合は全選択したくないということであれば、 フラグでEnter経由かどうか判断するのがいいかと思う。 あと、いちいち絡むなよ。 236 名前：デフォルトの名無しさん mailto:sage [2005/08/16(火) 12:07:32 ] あー、ごめ。単にEnter経由で判断だけだと、 タブ移動後にクリックした時にも全選択になっちゃうわ。 なんかうまい方法ないかなぁ。 237 名前：デフォルトの名無しさん mailto:sage [2005/08/16(火) 12:12:18 ] Private mouseEnter As Boolean = False Private Sub TextBox_Enter(ByVal sender As Object, ByVal e As System.EventArgs) Handles MyBase.Enter Me.SelectAll() If Me.MouseButtons <> MouseButtons.None Then mouseEnter = True End If End Sub Private Sub TextBox_MouseUp(ByVal sender As Object, ByVal e As System.Windows.Forms.MouseEventArgs) Handles MyBase.MouseUp MyBase.SelectAll() mouseEnter = False End Sub 238 名前：235-237 mailto:sage [2005/08/16(火) 12:13:56 ] マウスクリックでのEnterかどうかを判断するようにしてみた。 239 名前：デフォルトの名無しさん mailto:sage [2005/08/16(火) 12:14:22 ] ＞あと、いちいち絡むなよ。 馬鹿じゃないの。 「何も分かってないならだまってろ」 それを君に遠まわしに言ってるのに。。 240 名前：デフォルトの名無しさん mailto:sage [2005/08/16(火) 16:31:55 ] なんだもっと煽り合いになるかと思ったのに過疎っちまいやがったつまらん 241 名前：最凶VB厨房 mailto:sage [2005/08/16(火) 17:02:40 ] 次はもうちょっとうまいこと釣ってくれよ。 242 名前：デフォルトの名無しさん mailto:sage [2005/08/17(水) 22:21:50 ] >>all 色々ありがとうございます。 MouseDownで実装してみましたが、これもClickと 同様、テキストボックスのテキストの一部だけを選択 することができなくなるという問題がありました。 >>237 オリジナルのテキストボックスを作るのかな？ 面倒だから、そこまでは勘弁して欲しいな・・・。 VB.NETの継承とかコントロールの作り方はまだよく 分からないので。 243 名前：デフォルトの名無しさん mailto:sage [2005/08/17(水) 22:34:07 ] >>242 ユーザーコントロール作るの意外と簡単だよ。 前にも書いたけど、例えばここで解説されてる www12.plala.or.jp/pc-labo/vb_net/14/main.htm まあ実際には、ここの方法を応用してクラスライブラリ化した方が使いやすいと思う。 ユーザーコントロール作らないとしても、Tagにフラグ(mouseEnter)を食わせれば ソースを必要以上に汚さずに>>237のやり方が使えると思う。 244 名前：デフォルトの名無しさん mailto:sage [2005/08/17(水) 23:00:54 ] 会社で作った.netのソリューションファイルを家に持ってきて開こうとしたら開けません。 家のは2002で会社のは2003なんですけど、全く互換性無いんですか？ 245 名前：デフォルトの名無しさん mailto:sage [2005/08/17(水) 23:03:31 ] 2002のを2003のにするのはできるけど逆は無理。 一度2002のから2003のに変換したら逆変換は不可能。 246 名前：237 mailto:sage [2005/08/18(木) 00:20:27 ] >242 243に同意。テキストボックスが複数あるなら（というかあるだろうし） 絶対にユーザーコントロール作ったほうがいいと思います。 おんなじロジックを全てのテキストボックスに組み込むなんて ありえないっすよ。 あと、237のですが、mouseEnterがイベントハンドラの名前と かぶってます。ちゃんと見直してからうｐしろよ俺。 とりあえず、他の名前にしてください。 247 名前：デフォルトの名無しさん mailto:sage [2005/08/18(木) 17:13:45 ] VB.NETというよりAxWebBrowserの質問になるんですけど、 AxWebBrowserで表示されているPageからzipファイル等がResponse.Redirectされた場合、 ダウンロードが開始されるんですけど、そのダウンロードされているファイルのURLは取れますか？ 248 名前：デフォルトの名無しさん mailto:sage [2005/08/18(木) 18:12:00 ] 普通にBeforeNavigate2とかで取れるだろ 249 名前：247 mailto:sage [2005/08/18(木) 21:15:24 ] 実際に画面表示しないと取れないんですよ・・・。 zipとかのファイルであった場合、ダウンロードされるだけで画面表示されないので、 URLが変更されないみたい・・・。 250 名前：デフォルトの名無しさん mailto:sage [2005/08/18(木) 21:27:33 ] 変更？ AxSHDocVw.DWebBrowserEvents2_BeforeNavigate2EventにuRLプロパティが存在するが？ 251 名前：247 mailto:sage [2005/08/18(木) 22:25:54 ] 確かに存在するのですが、ダウンロードされるファイルのURLがuRLプロパティには入っていないんです。 nRLプロパティには現在表示しているURLが入っています・・・。 252 名前：247 mailto:sage [2005/08/18(木) 22:26:51 ] ひょっとして、Response.Redirectがだめなんですかね・・・？ 253 名前：デフォルトの名無しさん mailto:sage [2005/08/19(金) 00:05:39 ] リダイレクトが発生したときのリダイレクト先のURLはNavigateComplete2が一番早く取得できるみたいだね。 リダイレクトでダウンロードが発生するところを知らないから試せないが。 で、これがzipとかの場合AxSHDocVw.DWebBrowserEvents2_NavigateComplete2EventのuRLプロパティが正しく指さないってこと？ リダイレクトでhtml、直接zipはどっちも正しく指すんだけど。 //ん〜、FileDownloadが発生しない…… 254 名前：デフォルトの名無しさん mailto:sage [2005/08/19(金) 06:54:28 ] VB.NETかVB6でできるだけ多くの環境で動くネットワークプログラムを作りたいんすけど その場合VB6を選択すべきですか？ .NET FrameworkってXPでもデフォルトでインストールされてないし。 255 名前：247 mailto:sage [2005/08/19(金) 09:21:50 ] AxWebBrowser.Navigate2でzipファイルを指定するとNavigateComplete2.uRLで確かにzipファイルのURLが取得出来るんですが、 webForm1.aspxをNavigate2した後に、aspxのButton_ClickでzipファイルをResponse.Redirectしても NavigateComplete2.uRLにはwebForm1.aspxのURLが入ってる状態です。 FileDownloadは発生しないですね・・・。 256 名前：デフォルトの名無しさん mailto:sage [2005/08/19(金) 09:24:12 ] >>254 別にインストーラー作ればいいだけだし。 今更新規にVB6で作るって何考えてるのって思うし。 257 名前：デフォルトの名無しさん mailto:sage [2005/08/19(金) 09:37:01 ] >>256 んだな。今更ocx入れるのﾏﾝﾄﾞｸｾ。 258 名前：デフォルトの名無しさん mailto:sage [2005/08/19(金) 13:50:47 ] 別のPCのLAN上にIISがインストールされていれば ローカルにIISがインストールされていなくても ASPとかつくれますかね？ 259 名前：デフォルトの名無しさん mailto:sage [2005/08/19(金) 14:27:04 ] 何作るかしらんが、作るだけなら作れるでしょ。 ASPってのが何指してるのか不明だけど。 260 名前：デフォルトの名無しさん [2005/08/21(日) 06:12:21 ] >>69は天才だと思います。 261 名前：デフォルトの名無しさん mailto:sage [2005/08/21(日) 07:17:27 ] >>254 本当に「できるだけ多くの環境で動く」事が優先されるなら、VB6もVB.NETも不可だろう。 VB6で作成した場合、Windows Vistaまでしか動作保障されない。 VB.NETで作成した場合、Windows95や98は切り捨てることになるな。 262 名前：デフォルトの名無しさん mailto:sage [2005/08/21(日) 07:46:31 ] 一応98は.NET動くぜ。 263 名前：デフォルトの名無しさん mailto:sage [2005/08/21(日) 21:58:21 ] 名前空間に漢字使ってますが問題ないですかね？ 問題あったら教えてください。 264 名前：デフォルトの名無しさん mailto:sage [2005/08/21(日) 22:06:07 ] 少なくとも日本国内で開発する分には問題ないだろう。 実行には全く問題ない。 265 名前：デフォルトの名無しさん mailto:sage [2005/08/21(日) 22:06:07 ] >>263 漢字を使うという頭が問題あり 266 名前：デフォルトの名無しさん [2005/08/21(日) 22:09:45 ] 現在Visibleプロパティがtrueになっているformを知りたいときって どのようにしたらいいでしょうか？ If フォームA.Visible = True Then 　〜処理〜 ElseIf フォームB.Visible = True Then 　〜処理〜 　： 　： みたいにif文やswitch文を書き連ねていくと、ソースが汚らしく思えるのですが。。。 267 名前：デフォルトの名無しさん mailto:sage [2005/08/21(日) 22:11:57 ] ActiveForm/ActiveMdiChildとかそんなんじゃ駄目か？ ていうか何をどうやったらそんな判断が必要になるんだか。 268 名前：デフォルトの名無しさん [2005/08/21(日) 22:26:40 ] ありがとうございます。 Form.ActiveFormで現在アクティブなフォームを表すFormが取得できるんですね。 if文やらswitch文よりすっきり書けそうですね。 269 名前：デフォルトの名無しさん mailto:sage [2005/08/21(日) 23:19:32 ] >>264-265 サンクス。 楽に仕事がこなせるならそれで良いのです。 270 名前：デフォルトの名無しさん [2005/08/22(月) 12:57:22 ] フォーム(Public Class WebForm1)にラベルがあります。 Public WithEvents Label1 As System.Web.UI.WebControls.Label 別モジュール(Module1)に関数(sub kan1)を作りました。その中で Dim refForm1 As New プロジェクト名.WebForm1 というインスタンスを作りました。 で、refForm1.Label1.Text = "1" とやると「オブジェクト参照がオブジェクトインスタンスに設定されていません」 と出ます。refForm1.Label1　←　ここでNothingになります。 なぜですか？ 271 名前：デフォルトの名無しさん mailto:sage [2005/08/22(月) 13:36:13 ] Newしてないからだろ 272 名前：デフォルトの名無しさん [2005/08/22(月) 13:38:44 ] これじゃダメでしょうか？他のNewを思いつきません。 ＞Dim refForm1 As New プロジェクト名.WebForm1 273 名前：デフォルトの名無しさん mailto:sage [2005/08/22(月) 13:50:51 ] いや、あのよ、何がNothingなのか考えろ？ 274 名前：デフォルトの名無しさん mailto:sage [2005/08/22(月) 14:16:49 ] 横からでWebFormは知らんが、WebFormのインスタンスを生成しても、中のLabelのインスタンスが生成されてないんですよ。 Winformだと、コンストラクタからInitializeComponentが呼び出されてNewしてるんだけど、Webはしらん。しらべてみ。 275 名前：デフォルトの名無しさん mailto:sage [2005/08/22(月) 18:41:54 ] テキストボックスでIMEが変換中かどうか取得する目的で WndProcをオーバーライドしているのですが スペースのみ入力してタブキーで次のテキストボックスに移ったときは ENDCOMPOSITIONが来てくれません。 If m.Msg = &H10F Then 'WM_IME_COMPOSITION bIMEmode = True End If If m.Msg = &H10E Then 'WM_IME_ENDCOMPOSITION bIMEmode = False End If 対策としてとりあえずKILLFOCUSでＩＭＥモードのフラグを ＯＦＦにしてみましたが、あまり美しくありません。 If m.Msg = &H8 Then 'WM_KILLFOCUS bIMEmode = False End If スペースのみの場合はWM_IME_COMPOSITIONが飛んでこないように するにはどうすればよいでしょうか？ 276 名前：デフォルトの名無しさん mailto:sage [2005/08/23(火) 00:20:20 ] え、飛んできてるんだけど＞WM_IME_ENDCOMPOSITION あとWM_IME_COMPOSITIONじゃなくてWM_IME_STARTCOMPOSITIONじゃないかなぁ 277 名前：デフォルトの名無しさん mailto:sage [2005/08/23(火) 08:20:20 ] >>276 WM_IME_STARTCOMPOSITIONにしたら期待通りの動作をしてくれました。 ものすごく感謝です。 278 名前：デフォルトの名無しさん mailto:sage [2005/08/24(水) 10:31:47 ] AccessのMDBからOelDbDataReaderを使用してデータを取得したいのですが、 OelDbDataReaderのループの中でもう１つOelDbDataReaderを実行すると 「この接続に関連付けられているDataReaderがすでに開いています。」とエラーになってしまいます。 OleDbConnectionを複数作成してコネクションを複数張れば出来ると思うのですが、 色々と不都合(トランザクションが作れないとか)がありそうなのでやりたくありません。 OelDbDataReaderをネストしない場合は正常にデータを取得できています。 下はエラーになるサンプルです。 何か根本的に間違えているのでしょうか？ よろしくお願いします。 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 　　Dim DbConn As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\test.mdb") 　　DbConn.Open() 　　Dim dbCmd1 As OleDbCommand = DbConn.CreateCommand 　　dbCmd1.CommandText = "select * from TEST_TAB " 　　Dim dbReader1 As OleDbDataReader = dbCmd1.ExecuteReader() 　　While dbReader1.Read() 　　　　Trace.WriteLine(dbReader1("TEST_NO").ToString) 　　　　Dim dbCmd2 As OleDbCommand = DbConn.CreateCommand 　　　　dbCmd2.CommandText = "select * from TEST_TAB " 　　　　Dim dbReader2 As OleDbDataReader = dbCmd2.ExecuteReader()　 '← ＊＊＊ ここでエラー発生 ＊＊＊ 　　　　While dbReader2.Read() 　　　　　　Trace.WriteLine(dbReader2("TEST_NO").ToString) 　　　　End While 　　　　dbReader2.Close() 　　End While 　　dbReader1.Close() 　　DbConn.Close() End Sub 279 名前：デフォルトの名無しさん mailto:sage [2005/08/24(水) 10:40:33 ] MSDNにしっかり > OleDbDataReader の使用中は、関連付けられた OleDbConnection は、 > OleDbDataReader によって使用されるためビジー状態になります。 > この間、 OleDbConnection に対して、閉じる以外の操作は実行できません。 > OleDbDataReader の Close メソッドを呼び出すまでこの状態が続きます。 > たとえば、 Close を呼び出すまでは、出力パラメータは取得できません。 と書かれている。 280 名前：>278 mailto:sage [2005/08/24(水) 11:08:49 ] >>279 レスありがとうございます。 確かに解説の所に書いてありました・・・ 皆様はDBからデータの取得中(OleDbDataReaderの使用中)に 他のデータを取得する場合どのように実現されているのでしょうか？ それともDataSetみたいに全データを取得してから次のデータを取得、 みたいな方法でやっているのでしょうか？ よろしくお願いします。 281 名前：デフォルトの名無しさん mailto:sage [2005/08/24(水) 11:35:16 ] ・順次、配列等に読み込む ・DataAdapter & DataSet を使う ・複数のコネクションを張る ・ストアドプロシージャを使う 282 名前：デフォルトの名無しさん mailto:sage [2005/08/24(水) 11:47:56 ] >>281 ここの使用って改悪だよな。 バッチ的なテーブル処理に対して厳しいところがある。 ロックかけながらカーソル処理していくような処理で必ず詰まる。 283 名前：デフォルトの名無しさん mailto:sage [2005/08/24(水) 11:51:23 ] ADO.NET 2.0では一つのConnectionから複数のDataReaderを同時に開くことができるようになるとどこかで聞いた。 284 名前：デフォルトの名無しさん mailto:sage [2005/08/24(水) 14:30:05 ] 接続ドライブのプロパティに表示されるようなドライブ固有の名前（例：Maxtor 6Y160P0）を取得する関数というのはあるのでしょうか？ 285 名前：デフォルトの名無しさん mailto:sage [2005/08/24(水) 14:35:07 ] WMI使えば？ 286 名前：284 mailto:sage [2005/08/24(水) 14:43:56 ] >>285 ありがとうございます。ググってみます。 287 名前：284 mailto:sage [2005/08/24(水) 15:02:11 ] 解決しました。ありがとうございました。 288 名前：278 mailto:sage [2005/08/24(水) 15:31:57 ] >>281-283 レスありがとうございます。 今のところ直接目的にかなう解決方法がないのですね。 それが分かっただけでも良かったです。 ADO.NET 2.0では可能になるみたいですね。 www.microsoft.com/japan/msdn/vs05/adonet/ado2featurematrix.asp の「SqlClient における SQL Server 2005 固有の機能」に書かれていました。 「SQL Server 2005 固有の機能」と言っているだけに SQL Server 2005だけのような気がしますが・・・ ありがとうございました。 289 名前：284 mailto:sage [2005/08/24(水) 18:54:36 ] すいません。再度質問させてください。 >>284にあるドライブ固有の名前の取得方法はわかったのですが これとドライブレター名（例：C）とを関連付ける方法がわかりません。 Select * From Win32_DiskDrive でドライブ固有の名前を Select * From Win32_LogicalDisk でドライブレター名を取得することはできたのですが・・・ 290 名前：デフォルトの名無しさん mailto:sage [2005/08/24(水) 19:47:54 ] まあ基本的に物理ドライブと論理ドライブはあんまり相関のないものだからねー。 Win32_LogicalDiskToPartition/Win32_DiskDriveToPartitionクラス辺りを使って頑張ればいけそうかな。 ん〜、Win32APIでやろうとしたらどうだろ。 DeviceIoControlを駆使することになるのかな。 ttp://66.102.7.104/search?q=cache:LVJxUPDlORYJ:vbnet.mvps.org/code/disk/+API+%22physical+disk%22+partition+volume&hl=ja とてもお薦めできなさそうだ。 291 名前：284 mailto:sage [2005/08/24(水) 19:50:01 ] >>290 ありがとうございました。これからぐぐります。 292 名前：デフォルトの名無しさん mailto:sage [2005/08/25(木) 00:38:17 ] VBとVB.netの違いって何？ 293 名前：デフォルトの名無しさん mailto:sage [2005/08/25(木) 04:40:59 ] .net 294 名前：デフォルトの名無しさん [2005/08/25(木) 11:19:54 ] DBMS_SQL.NUMBER_TABLEをパラメータに持つ ストアドファンクションに VBから配列を渡したいのですが myOracleCommand.Parameters.Add()だと InvalidCastExceptionが出ます。 どうやればよいのでしょうか？ 私が書いたのはこんな感じです myOracleConnection.Open() myOracleCommand = New OracleCommand("sf_test", myOracleConnection) myOracleCommand.CommandType = CommandType.StoredProcedure Dim id(500) As Int32 〜中略〜 'コマンドパラメータ設定 myOracleCommand.Parameters.Add(id)←ここでInvalidCastException 295 名前：デフォルトの名無しさん mailto:sage [2005/08/25(木) 11:50:25 ] ODP.NETだよね？ どちらかといえばデータベース板のOracleスレ向きな気もするけど。 PL/SQL表をバインドする場合、 OracleParameter.CollectionTypeを OracleCollectionType.PLSQLAssociativeArrayにしないと駄目。 詳しくはOTNのODP.NET開発者ガイドを参照してください。 296 名前：デフォルトの名無しさん mailto:sage [2005/08/25(木) 13:02:05 ] かなり初歩的な質問だと思うのですが・・・ ある処理中に処理中であることを示すウインドウを表示させたいのですが どうにもうまくいきません。どのような方法が考えられるでしょうか？ 297 名前：デフォルトの名無しさん mailto:sage [2005/08/25(木) 13:05:19 ] 抽象的すぎる質問だな。 どうやってみてどううまくいかないんだ？ 298 名前：295 [2005/08/25(木) 13:19:55 ] 今調べてみたらODP.Net入れてなくて DBアクセスしてたんだけどこれは ODBCなのかな？ 299 名前：デフォルトの名無しさん mailto:sage [2005/08/25(木) 13:22:21 ] >>296 まずWindowsFormsなのかASP.NETなのか書いてくれ。 300 名前：294 [2005/08/25(木) 13:28:56 ] >>295 調べたらOLE DB .NETでした・・・（しかも自分は294だしorz） これでもやり方は変わらないのかしら？ 301 名前：デフォルトの名無しさん mailto:sage [2005/08/25(木) 13:38:15 ] >298 ちょいまて、295は俺だ。 てか、どのDataProvider使ってるかくらいは把握しといたほうが・・・。 ODP.NETじゃなく、.NET Framework Data Provider for Oracleだったとしたら MSDNにPL/SQL表は使えないと書いてある。 使いたければMSDAORAと共に.NET Framework Data Provider for OLE DB使えってさ。 302 名前：デフォルトの名無しさん mailto:sage [2005/08/25(木) 13:40:58 ] >>300 いや、Oracleが出してるやつじゃないと無理だと思う。 303 名前：294 [2005/08/25(木) 16:58:17 ] >>295、302 返事遅れましたが、とりあえず何とかなりそうです。 感謝感謝。 304 名前：デフォルトの名無しさん [2005/08/25(木) 17:05:18 ] vb.netでoracleのあるテーブルからデータを取得し、 そのデータを新規で作成したmdbに登録したいのですが。 そのようなことは可能でしょうか？ よろしくお願いいたします。 305 名前：デフォルトの名無しさん mailto:sage [2005/08/25(木) 17:20:04 ] そのようなことは可能です。 よろしくお願いいたします。 306 名前：デフォルトの名無しさん [2005/08/25(木) 17:30:36 ] 超初心者です。 PUBLIC:COMPONENT で始まるのってなんですか？

---

---

[ 続きを読む ] / [ 携帯版 ]

read.cgi ver5.27 [feat.BBS2 +1.6] / e.0.2 (02/09/03) / eucaly.net products.
担当:undef