VBプログラマ質問スレ(6.0以前) Part54at TECH
VBプログラマ質問スレ(6.0以前) Part54 - 暇つぶし2ch609:デフォルトの名無しさん
08/07/22 00:42:33
自力でがんばってみます
短い間でしたがありがとうございました。


610:デフォルトの名無しさん
08/07/22 00:53:38
>>609
あと数分待て

611:デフォルトの名無しさん
08/07/22 01:05:12
フィードパス使え

612:デフォルトの名無しさん
08/07/22 01:06:57
コードだけ貼れないから直接見ろ
URLリンク(www.uploda.org)

613:デフォルトの名無しさん
08/07/22 01:13:08
本当にありがとうございました
助かります

614:デフォルトの名無しさん
08/07/22 01:55:27
なぜドル・ポンド・ユーロが2つずつあるのでしょうか?
あと「うんこ」の部分を「換算」に変えたいのですがどこをいじればいいのですか?

615:600
08/07/22 02:06:09
こんな糞コード弄らないで1から書けよ

616:デフォルトの名無しさん
08/07/22 05:02:59
>>612

614にコメントしたことはさきほど変えられました。
ありがとうございました

617:デフォルトの名無しさん
08/07/22 09:56:53
すみません。フォームをunload meで閉じたあとに
そのフォームがフォームのkeyupイベントを拾ってしまって
勝手にloadされてしまうのですが
このようなことってあるのでしょうか?
フォームはkeypreviewがonになっています。

618:デフォルトの名無しさん
08/07/22 10:53:09
質問します

Option Explicit

Sub zzz()
Dim hoge(3) As Variant
Dim hogehoge As Byte
Dim z As Byte

For z = 1 To 3
For hogehoge = 1 To 3
hoge(z) = Range("A" & hogehoge).Value
Next hogehoge
Next z
End Sub

上のようなコードで、zとhogehogeを同時に
インクリメントすることは可能でしょうか?

619:デフォルトの名無しさん
08/07/22 11:31:42
いやそのかんがえかたはおかしい

620:デフォルトの名無しさん
08/07/22 12:24:11
自己解決しました

621:デフォルトの名無しさん
08/07/22 19:25:55
すんませんが・・・教えてください。

VB6から使えるコントロールで、msinet.dll を使わないで、独立してHTTP通信を
カプセルするものって無いでしょうか?Grapecity さんのは内部でmsinet使っている
らしくて・・・

有償ものでかまいません。出来れば日本語版がいいけど・・


622:デフォルトの名無しさん
08/07/22 21:24:18
WinHTTPとかどうよ

「Microsoft WinHttpRequest Component」を参照追加して
Dim WinHttpReq As New WinHttp.WinHttpRequest
WinHttpReq.Open "GET", "URLリンク(www.microsoft.com)", FALSE
WinHttpReq.Send
Dim d() As Byte
d() = WinHttpReq.ResponseBody

だってさ。

623:デフォルトの名無しさん
08/07/22 21:43:01
読むだけならopenだけでできなかったっけ?

624:621
08/07/23 03:41:39
WinHTTP・・・調べてみます。xmlhttp ではなくって?

しばらく考えて・・・結局、NICを直接使うDLLなんかまず無いだろうから、
WinINet.dllを使っているレベルで妥協するしかないのかなと・・・
openURL のバグがたまに起きるのが面倒なのと、アップロード時(POST)に途中でちょん切れる
PCがたま~にあるんですよね。古いPC相手にするのは面倒っす


625:デフォルトの名無しさん
08/07/23 09:17:50
スレ違いな気もするのですが、VB6ならなんとか組めるので
ここで質問させていただきます。よろしくお願いします。

現在PCにLANで接続されたプリンタが約50台程登録されています。
プリンタはプロパティ>印刷設定>給紙で、印刷先のトレイを設定しています。
今回このPCを新しくする事になり、旧PCの設定が正しく新PCへ引き継がれているという資料を
提出しなければいけなくなりました。

この50台のプリンタ(物理的には20台)の印刷先トレイの設定情報を
textでも印刷設定画面の画像でも、なんでもいいので一覧で出力したいのですが
良い方法がありますでしょうか?

rundll32 printui.dll,PrintUIEntry /e /n "PrinterName"
で印刷設定画面までは表示できたのですが、給紙のタブへ切り替えたりする方法がわかりません。

rundll32 printui.dll,PrintUIEntry /?
で出てきた内容を見ていくつか試してみたのですが、目的とする物は出力できませんでした。

アドバイスよろしくお願いいたします。

626:625
08/07/23 09:21:04
環境を書くのを忘れていました。
OS:Win2000(SP3)
プリンタ:CANON LBPシリーズ
VB:VB6(SP6)


627:デフォルトの名無しさん
08/07/23 11:42:58
給紙のタブに切り替えるのはSendKeyとかでCtrl+Tab送ってあげればいいんじゃない?
悩んでるぐらいならハードコピーとって切り貼りした方が絶対早く終わると思うけど。


628:デフォルトの名無しさん
08/07/23 22:42:33
どーせレジストリに格納されてるんだろうから、
regmonあたりで格納場所を決定して、あとは
リモートレジストリ経由で取ってまわったら終わりじゃないの。

629:デフォルトの名無しさん
08/07/24 22:10:33
>>624
低水準なものが欲しいなら、Winsock使ったら?


最新レス表示
レスジャンプ
類似スレ一覧
スレッドの検索
話題のニュース
おまかせリスト
オプション
しおりを挟む
スレッドに書込
スレッドの一覧
暇つぶし2ch