WIA、Vista 和 VB6。这段代码有效吗？

Posted 2023-04-18

【中文标题】WIA、Vista 和 VB6。这段代码有效吗？

【英文标题】：WIA, Vista, and VB6. Does this code work?

【发布时间】：2011-01-04 16:40:03

【问题描述】：

基本上这里的限制是我必须使用 WIA，因为我试图让我的扫描仪软件在 Windows 7 和 Vista 中工作。如果我在VB6中可以这样做，那将是优选的（真正的优选）。 现在我已经编译了这段代码和所有内容，但是当我运行它时，我收到错误“没有可用的所选类型的 WIA 设备”。我开始怀疑我的扫描仪不是WIA兼容。

任何人都可以确认此代码应该有效吗？ （需要与任何不仅仅是扫描仪的WIA设备）

Dim WIADia As WIA.CommonDialog
Dim Scan As WIA.DeviceManager


Set WIADia = New WIA.CommonDialog
Set Scan = WIADia.ShowSelectDevice(WIA.WiaDeviceType.UnspecifiedDeviceType, True, False)
WIADia.ShowAcquisitionWizard (Scan)

谢谢！

【问题讨论】：

至少，您应该删除Scan 周围的( 和)。这将导致该值被评估，并且很可能在那时出现错误。哪个呼叫在说“不可用WIA设备”？它是否适用于任何其他扫描应用程序？ span>

它在我的机器上也是如此，但我没有连接扫描仪。不过我确实有一个网络摄像头....

【参考方案1】：

        WIA.CommonDialog WIADia;
        Device Scan;

        WIADia = new WIA.CommonDialog();
        Scan = WIADia.ShowSelectDevice(WiaDeviceType.UnspecifiedDeviceType, true, false);
        WIADia.ShowAcquisitionWizard(Scan);

【讨论】：

您所做的只是转换为 C#... 您的意思是要包含更多内容吗？或者也许是一个答案？