なんでも掲示板

[131] 題名:VC++.NETのOCXの作成方法について 投稿者:匿名メール 投稿日:2004/01/16 13:06 　

VC++.NETのOCX作成方法をご存知でしたら教えて頂きたいと
思います。お願い致します。

[130] 題名:Re[129]:ＥＸＥからＶＢソースに逆展開できませんか 投稿者:近藤 投稿日:2004/01/16 11:22 　

大変申し訳御座いませんが、私には解りません。
一般的に
ＰコードでEXEを生成している場合、可能性があるかもしれませんが、
通常コンパイルでは、無理であると考えています。

>ＶＢにてハンディターミナルバーコードリーダーユーティリティに送信するプログラムを作成し、ＥＸＥコンパイル作成しました。
>しかし、サーバ故障によりＶＢソースプログラムが消失してしまいました。ＥＸＥファイルは残っているのですがこのＥＸＥファイルからＶＢソースプログラムに逆展開するなんて事はできないでしょうか？

[129] 題名:ＥＸＥからＶＢソースに逆展開できませんか 投稿者:匿名メール 投稿日:2004/01/16 11:16 　

ＶＢにてハンディターミナルバーコードリーダーユーティリティに送信するプログラムを作成し、ＥＸＥコンパイル作成しました。
しかし、サーバ故障によりＶＢソースプログラムが消失してしまいました。ＥＸＥファイルは残っているのですがこのＥＸＥファイルからＶＢソースプログラムに逆展開するなんて事はできないでしょうか？

[128] 題名:Re[127]:VBからアクセスのマクロ（AutoExex）を使用してレポートを表示したい 投稿者:近藤 投稿日:2003/09/12 09:08 　

一体何を、望んでいるのでしょう？

[127] 題名:VBからアクセスのマクロ（AutoExex）を使用してレポートを表示したい 投稿者:Kazu 投稿日:2003/09/11 14:35 　

VBで作成した画面にあるボタンを押下後、アクセスのレポートを表示したいのですが。
マクロを作成しそのマクロの名前をAutoExexという名にしテーブルと関連付けるとMDBが開かれた時に自動的にレポートを表示してくれるとも聞きました。
詳しいこと解らないので上記のやり方のマクロのつくり方とVBからそのつくったマクロやMDBを呼んだりレポートを開くやり方もしくはコーディングの仕方を教えていただきたいのですが。お忙しい所申し訳ありませんが初心者の僕になにとぞご指導よろしくお願いします。

[126] 題名:Re[125]:Re[124]:Re[123]:Accessオブジェクトエラーについて 投稿者:近藤 投稿日:2003/09/07 08:32 　

application.hWndAccessAppが、アクセスのオブジェクトですので、
これは、参照設定するか、CreateObjectでオブジェクトをＶＢで見れるようにする必要があると思います。

[125] 題名:Re[124]:Re[123]:Accessオブジェクトエラーについて 投稿者:梁川 投稿日:2003/09/07 00:51 　

結局、駄目だったので
フォームモジュールを追加してForm2にすべて記述し
.hwnd = application.hWndAccessApp
を.hwnd =nHwndに変更し
VB6のメニューのプロジェクト→参照設定でMicrosoft Access 9.0 object libraryを追加しないと動きませんでした。

でも、何が問題でコピーされないのか不明ですが・・・？？

また、.hwnd = application.hWndAccessApp
を.hwnd =nHwnd


>使用環境（Access97　OS：Win2000）
>何の問題も無く、コピーできます。
>今回ＶＢ６は、関係ないですよね？
>
>>エクスプローラー風ファイルコピーを作成しているのですが
>>Accessのハンドルを以下のようにセットすると
>>実行エラー424　（オブジェクトが必要です）と表示される。なぜ？？
>>
>>使用環境（VB6 Access2000　OS：Win98）
>>
>>
>>.hwnd = application.hWndAccessApp
>>
>>’標準モジュールへ記述
>>Option Explicit
>>
>>Type SHFILEOPSTRUCT
>>hwnd As Long
>>wFunc As Long
>>pFrom As String
>>pTo As String
>>fFlags As Integer
>>fAnyOperationsAborted As Long
>>hNameMappings As Long
>>lpszProgressTitle As String
>>End Type
>>
>>Declare Function SHFileOperation Lib \"SHELL32.DLL\" Alias _
>>\"SHFileOperationA\" (lpFileOp As SHFILEOPSTRUCT) As Long
>>
>>Const FO_COPY = &H2
>>Const FO_MOVE = &H1
>>Const FOF_NOCONFIRMATION = &H10
>>Const FOF_RENAMEONCOLLISION = &H8
>>
>>
>>Private Sub Command1_Click()
>>
>>\'次の例では、ファイル\"c:\\My Documents\\Test.mdb\"を\"c:\\Test.mdb\"にコピーします。
>>
>>Dim stShellOp As SHFILEOPSTRUCT
>>
>>Const cstrSrcFile As String = \"c:\\My Documents\\Test.mdb\"
>>Const cstrDstFile As String = \"c:\\Test.mdb\"
>>
>>With stShellOp
>>.hwnd = application.hWndAccessApp
>>.wFunc = FO_COPY
>>.pFrom = cstrSrcFile
>>.pTo = cstrDstFile
>>End With
>>
>>If SHFileOperation(stShellOp) = 0 Then
>>Beep
>>MsgBox \"コピー完了しました！\"
>>Else
>>Beep
>>MsgBox \"コピーに失敗またはキャンセルされました！\"
>>End If
>>
>>End Sub
>>

[124] 題名:Re[123]:Accessオブジェクトエラーについて 投稿者:近藤 投稿日:2003/09/06 19:39 　

使用環境（Access97　OS：Win2000）
何の問題も無く、コピーできます。
今回ＶＢ６は、関係ないですよね？

>エクスプローラー風ファイルコピーを作成しているのですが
>Accessのハンドルを以下のようにセットすると
>実行エラー424　（オブジェクトが必要です）と表示される。なぜ？？
>
>使用環境（VB6 Access2000　OS：Win98）
>
>
>.hwnd = application.hWndAccessApp
>
>’標準モジュールへ記述
>Option Explicit
>
>Type SHFILEOPSTRUCT
>hwnd As Long
>wFunc As Long
>pFrom As String
>pTo As String
>fFlags As Integer
>fAnyOperationsAborted As Long
>hNameMappings As Long
>lpszProgressTitle As String
>End Type
>
>Declare Function SHFileOperation Lib \"SHELL32.DLL\" Alias _
>\"SHFileOperationA\" (lpFileOp As SHFILEOPSTRUCT) As Long
>
>Const FO_COPY = &H2
>Const FO_MOVE = &H1
>Const FOF_NOCONFIRMATION = &H10
>Const FOF_RENAMEONCOLLISION = &H8
>
>
>Private Sub Command1_Click()
>
>\'次の例では、ファイル\"c:\\My Documents\\Test.mdb\"を\"c:\\Test.mdb\"にコピーします。
>
>Dim stShellOp As SHFILEOPSTRUCT
>
>Const cstrSrcFile As String = \"c:\\My Documents\\Test.mdb\"
>Const cstrDstFile As String = \"c:\\Test.mdb\"
>
>With stShellOp
>.hwnd = application.hWndAccessApp
>.wFunc = FO_COPY
>.pFrom = cstrSrcFile
>.pTo = cstrDstFile
>End With
>
>If SHFileOperation(stShellOp) = 0 Then
>Beep
>MsgBox \"コピー完了しました！\"
>Else
>Beep
>MsgBox \"コピーに失敗またはキャンセルされました！\"
>End If
>
>End Sub
>

[123] 題名:Accessオブジェクトエラーについて 投稿者:梁川 投稿日:2003/09/06 17:48 　

エクスプローラー風ファイルコピーを作成しているのですが
Accessのハンドルを以下のようにセットすると
実行エラー424　（オブジェクトが必要です）と表示される。なぜ？？

使用環境（VB6 Access2000　OS：Win98）


.hwnd = application.hWndAccessApp

’標準モジュールへ記述
Option Explicit

Type SHFILEOPSTRUCT
hwnd As Long
wFunc As Long
pFrom As String
pTo As String
fFlags As Integer
fAnyOperationsAborted As Long
hNameMappings As Long
lpszProgressTitle As String
End Type

Declare Function SHFileOperation Lib \"SHELL32.DLL\" Alias _
\"SHFileOperationA\" (lpFileOp As SHFILEOPSTRUCT) As Long

Const FO_COPY = &H2
Const FO_MOVE = &H1
Const FOF_NOCONFIRMATION = &H10
Const FOF_RENAMEONCOLLISION = &H8


Private Sub Command1_Click()

\'次の例では、ファイル\"c:\\My Documents\\Test.mdb\"を\"c:\\Test.mdb\"にコピーします。

Dim stShellOp As SHFILEOPSTRUCT

Const cstrSrcFile As String = \"c:\\My Documents\\Test.mdb\"
Const cstrDstFile As String = \"c:\\Test.mdb\"

With stShellOp
.hwnd = application.hWndAccessApp
.wFunc = FO_COPY
.pFrom = cstrSrcFile
.pTo = cstrDstFile
End With

If SHFileOperation(stShellOp) = 0 Then
Beep
MsgBox \"コピー完了しました！\"
Else
Beep
MsgBox \"コピーに失敗またはキャンセルされました！\"
End If

End Sub

[122] 題名:Re[121]:ＶＢでＷＥＢ上のＴｅｘｔＢｏｘに確実に入力したいのですが？ 投稿者:近藤 投稿日:2003/08/25 21:03 　

>ＶＢでＷＥＢ上のＴｅｘｔＢｏｘに確実に入力したいのですが？
>ＳｅｎｄＫｅｙですると100％確実には入力できないときがあるのです。確実にＴｅｘｔＢｏｘを指定して値を入力できないでしょうか？
>
ブラウザがそのインターフェイスを公開していれば、可能ですが。。。