EPSON Scan无法打开解决方法
佚名
2022-08-16 18:34:41
关注
有很多人不知道E
一、问题描述:
一体机_扫描仪通过USB线连接,启动Epson scan提示“无法与扫描仪连接”;
二、原因分析:
1、电脑和扫描仪通讯中断。
2、扫描仪驱动安装不正确,扫描仪设备无法识别。
三、解决方法:
1、检查扫描仪或一体机电源是否打开,USB线是否连接。
2、右键点击电脑桌面“我的电脑”(Windows XP)/“计算机”(Windows 7/8)图标,选择“管理”→“设备管理器”→“图像处理设备”,查看是否有对应扫描仪/一体机设备。
(1)没有“图像设备”或者展开“图像设备”没有对应扫描仪/一体机型号,此情况为通讯中断电脑没有检查到扫描仪设备。请重新连接USB线、更换USB线或者更换电脑测试。
(2)“图像设备”显示叹号EPSON Scanner,(2)设备未识别,计算机未正确识别扫描仪/一体机,请重新安装扫描仪驱动程序或使用“360驱动大师”等工具修复驱动程序。
(3)“图像处理设备”设备正常,仍然无法启动Epson Scan程序时,点击“开始”→“运行”(按Windows+R快捷键),输入“wiaacmgr”命令,使用WinScan工具扫描。
得说明是什么型号的PLC啊,串口还是网口,VB6还是VBNET?
算了,写段代码,VBNET与Q系列以太网通讯的:
Imports SystemNetImports SystemRuntimeInteropServices
Public Class Form1
Dim Handle1 As Int32
Dim EntLink1 As Boolean
Dim ScanCount1 As Long
Dim PLC As New EntQsPlc_AscPlcClient'EntQsPlc_ASCDLL是Q系列以太网通讯组件
Public Declare Function timeGetTime Lib "winmmdll" () As UInt32
Private Sub Form1_Load(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles MyBaseLoad
MeCenterToScreen()
cmbReadMryItemsClear()
cmbReadMryItemsAdd("X")
cmbReadMryItemsAdd("Y")
cmbReadMryItemsAdd("M")
cmbReadMryItemsAdd("D")
cmbReadMryItemsAdd("R")
cmbReadMryItemsAdd("Z")
'
cmbWriteMryItemsClear()
cmbWriteMryItemsAdd("X")
cmbWriteMryItemsAdd("Y")
cmbWriteMryItemsAdd("M")
cmbWriteMryItemsAdd("D")
cmbWriteMryItemsAdd("R")
cmbWriteMryItemsAdd("Z")
'
cmbBitMryItemsClear()
cmbBitMryItemsAdd("X")
cmbBitMryItemsAdd("Y")
cmbBitMryItemsAdd("M")
'
cmbReadTypeItemsClear()
cmbReadTypeItemsAdd("INT16")
cmbReadTypeItemsAdd("UINT16")
cmbReadTypeItemsAdd("DINT32")
cmbReadTypeItemsAdd("HEX32")
cmbReadTypeItemsAdd("REAL32")
cmbReadTypeItemsAdd("BIN16")
'
cmbWriteTypeItemsClear()
cmbWriteTypeItemsAdd("INT16")
cmbWriteTypeItemsAdd("UINT16")
cmbWriteTypeItemsAdd("DINT32")
cmbWriteTypeItemsAdd("HEX32")
cmbWriteTypeItemsAdd("REAL32")
cmbWriteTypeItemsAdd("BIN16")
cmbReadMrySelectedIndex = 3
cmbWriteMrySelectedIndex = 3
cmbBitMrySelectedIndex = 2
cmbReadTypeSelectedIndex = 0
cmbWriteTypeSelectedIndex = 0
lstReadItemsClear()
txtWriteText = ""
'
cmbCmdTypeSelectedIndex = 0
End Sub
Private Sub butLink_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles butLinkClick
Dim re As Short
Dim restr As String = ""
re = PLCEntLink(Trim(txtLocalIPText), Val(txtLocalPortText), Trim(txtRemoteIPText), Val(txtRemotePortText), "DEMO", Handle1, 1000, CBool(cmbCmdTypeSelectedIndex))
txtReLinkText = reToString
If re = 0 Then
EntLink1 = True
MsgBox("PLC联接成功! ")
Else
EntLink1 = False
MsgBox("PLC联接失败: " & restr)
End If
End Sub
Private Sub butClose_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles butCloseClick
Dim re As Short
If Not EntLink1 Then
MsgBox("还未与PLC建立联接!")
Exit Sub
End If
re = PLCDeLink(Handle1)
txtReCloseText = reToString
End Sub
Private Sub butRead_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles butReadClick
Dim re As Short
Dim i As Short
Dim RD() As Object
ReDim RD(Val(txtReadCntText - 1))
If Not EntLink1 Then
MsgBox("还未与PLC建立联接!")
' Exit Sub
End If
Dim mry As EntQsPlc_AscPlcClientPlcMemory = cmbReadMrySelectedIndex + 1
Dim typ As EntQsPlc_AscPlcClientDataType = cmbReadTypeSelectedIndex + 1
re = PLCCmdRead(Handle1, mry, typ, CInt(txtReadAddText), CUShort(txtReadCntText), RD)
txtReReadText = reToString
lstReadItemsClear()
For i = 0 To UBound(RD) Step 1
If Not IsNothing(RD(i)) Then lstReadItemsAdd(RD(i))
Next i
If re <> 0 Then
Timer1Enabled = False
butScanText = "Cycle R/W"
End If
End Sub
Private Sub butWrite_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles butWriteClick
Dim re As Short
Dim i As Short
Dim temp() As String
Dim WD() As Object
If Not EntLink1 Then
MsgBox("还未与PLC建立联接!")
Exit Sub
End If
ReDim WD(Val(txtWriteCntText) - 1)
temp = Split(txtWriteText, vbCrLf)
For i = 0 To UBound(WD) Step 1
If i > UBound(temp) Then
WD(i) = 0
Else
WD(i) = Trim(temp(i))
End If
Next i
Dim mry As EntQsPlc_AscPlcClientPlcMemory = cmbWriteMrySelectedIndex + 1
Dim typ As EntQsPlc_AscPlcClientDataType = cmbWriteTypeSelectedIndex + 1
re = PLCCmdWrite(Handle1, mry, typ, CInt(txtWriteAddText), CUShort(txtWriteCntText), WD)
txtReWriteText = reToString
If re <> 0 Then
Timer1Enabled = False
butScanText = "Cycle R/W"
End If
End Sub
Private Sub butScan_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles butScanClick
If Not EntLink1 Then
MsgBox("还未与PLC建立联接!")
Exit Sub
End If
Timer1Enabled = Not Timer1Enabled
If Timer1Enabled Then
ScanCount1 = 0
butScanText = "Stop R/W"
Else
butScanText = "Cycle R/W"
End If
End Sub
Private Sub Timer1_Tick(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles Timer1Tick
Timer1Enabled = False
Dim tim As Integer = timeGetTime
If Not EntLink1 Then
MsgBox("还未与PLC建立联接!")
Exit Sub
End If
'
Call butRead_Click(Nothing, Nothing)
Call butWrite_Click(Nothing, Nothing)
'
If (Val(txtReReadText) < 0) Or (Val(txtReWriteText) < 0) Then
butScanText = "Cycle R/W"
Exit Sub
Else
ScanCount1 += 1
txtScanCntText = ScanCount1
txtScanPrdText = (timeGetTime - tim) & "ms"
End If
Timer1Enabled = True
End Sub
Private Sub butBitTest_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles butBitTestClick
If Not EntLink1 Then
MsgBox("还未与PLC建立联接!")
Exit Sub
End If
Dim rd As Boolean
Dim re As Short
Dim mry As EntQsPlc_AscPlcClientPlcMemory = cmbBitMrySelectedIndex + 1
re = PLCBit_Test(Handle1, mry, CUShort(txtBitAddText), rd)
txtBitTestText = rd
txtReBitText = re
End Sub
Private Sub butBitSet_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles butBitSetClick
If Not EntLink1 Then
MsgBox("还未与PLC建立联接!")
Exit Sub
End If
Dim re As Short
re = PLCBit_Set(Handle1, cmbBitMrySelectedIndex + 1, Val(txtBitAddText))
txtReBitText = re
End Sub
Private Sub butBitRst_Click(ByVal sender As SystemObject, ByVal e As SystemEventArgs) Handles butBitRstClick
If Not EntLink1 Then
MsgBox("还未与PLC建立联接!")
Exit Sub
End If
Dim re As Short
re = PLCBit_Reset(Handle1, cmbBitMrySelectedIndex + 1, Val(txtBitAddText))
txtReBitText = re
End Sub
End Class
package Demo;
import javautilScanner;
public class Demo01 {
public static void main(String[] args) {
Scanner scanner = new Scanner(Systemin);
Systemoutprint("输入第一个整数:");
int a=scannernextInt();
Systemoutprint("输入第二个整数:");
int b=scannernextInt();
Systemoutprint("输入第三个整数:");
int c=scannernextInt();
Systemoutprintln("您输入的日期为:"+a+"|"+b+"|"+c);
}
}
package LinkedList1;
import javautilScanner;
public class Test {
public static void main(String[] args) {
int m,m1,k=0;
Scanner scan=new Scanner(Systemin);
Systemoutprintln("请输入第一个数组的元素的个数");
m=scannextInt();
int [] a1=new int[m];
Systemoutprintln("请输入第一个数组的元素的个数");
m1=scannextInt();
int [] a2=new int[m1];
int []a3=new int [a1length+a2length];
Systemoutprintln("请输入第一个数组的元素");
for(int i=0;i<m;i++){
a1[i]=scannextInt();
a3[k]=a1[i];
k++;
}
Systemoutprintln("请输入第二个数组的元素");
for(int i=0;i<m1;i++){
a2[i]=scannextInt();
a3[k]=a2[i];
k++;
}
Systemoutprintln("数组的元素有");
for(int i=0;i<a3length;i++)
Systemoutprint(a3[i]+" ");
Systemoutprintln();
for(int i=0;i<a3length;i++)
for(int j=0;j<a3length;j++){
int t;
if(a3[i]>a3[j]){
t=a3[i];
a3[i]=a3[j];
a3[j]=t;
}
}
Systemoutprintln("逆序后数组的元素有");
for(int i=0;i<a3length;i++)
Systemoutprint(a3[i]+" ");
Systemoutprintln();
}
}
以上就是关于惠普扫描软件scan打不开全部的内容,包括:惠普扫描软件scan打不开、能给我发个VB与三菱PLC通讯的源代码实例吗,非常感谢啊、java 写一个程序,读入三个整数,分别表示日期的日,月,年,输出日期的形式为"日|月|年等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)