下列代码写在窗口按钮,我登陆表Name列已有我计算机名字段,但find没有找到符合条件行,请问代码问题在那里,谢谢。这段代码目的是参照帮助文件监视器,保存当前计算机扫描仪路径。
'Dim txt1 As String = e.Form.Controls("TextBox1").text
Dim HostName As String
HostName = System.Net.Dns.GetHostName '获得本机的机器名
Dim dr As DataRow
Dim Index As Integer
dr = DataTables("登录").Find("[Name] = '" & HostName & "'")
Index = Tables("登录").FindRow(dr)
If Index > = 1 Then
Output.Show("找到了")
' 启动扫描仪
Else
Output.Show("没有找到")
'提示写入扫描仪路径C:\Windows\twain_32\escndv\escndv.exe
'Dim drv As dataRow = dataTables("登录").AddNew()
'drv("Name") = HostName
'drv("路径") = txt1
End If