- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- [求助]服务器端提示 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=130116)
-- 发布时间：2019/1/14 0:20:00
-- [求助]服务器端提示
老师，
获取编码
Dim getbh As String \'return 编号
Dim tbname As String=Args(0) \'读参数1,表名
Dim clname As String=Args(1) \'读参数2,列名
Dim mxid As String=Args(2) \'读参数2,列名
Dim sqldate,numdate As Date \'SQL服务器时间,指定表的编号使用时间
Dim dt As DataTable
Dim dr As DataRow
Dim t As Integer
Dim xh As Integer=0 \'update所影响行数的结果作为循环依据
Dim numpre,numlen As String \'准备存放前缀字符,序列号长度
Dim num As Integer \' \'准备存放表中当前序号
Dim cmd,cmd2 As New SQLCommand
cmd.C
cmd.CommandText = "select getdate()"
sqldate=cmd.ExecuteScalar() \'读SQL系统日期
Do
cmd.CommandText = "Select top 1 * Fr om {numberrecovery} where tablename=\'" & tbname & "\' and colname=\'" & clname & "\' and mxsysid=\'" & CStr(mxid) & "\' and [used] = 0 Or [used] Is Null order by recoveryidx"
MessageBox.Show(cmd.CommandText)
dt = cmd.ExecuteReader() \'读行记录
MessageBox.Show(dt Is Nothing)
If dt Is Nothing Then
getbh=""
Exit Do \'没有行记录则直接退出返回
End If
[此贴子已经被作者于2019/1/14 8:16:59编辑过]
-- 发布时间：2019/1/14 0:21:00
--
第一个 MessageBox.Show 显示
此主题相关图片如下：1.png
-- 发布时间：2019/1/14 0:21:00
--
在SQL查询中 有结果
此主题相关图片如下：b92d8d59-cf88-40c9-8a0a-39206b30d2ac.png
-- 发布时间：2019/1/14 0:23:00
--
第二个 MessageBox.Show 显示
为 true
为什么呢？
同时 提示 错误
.NET Framework 版本：2.0.50727.8937
Foxtable 版本：2018.10.9.1
错误所在事件：
详细错误信息：
对象名 \'numberrecovery\' 无效。
-- 发布时间：2019/1/14 9:15:00
--
都会返回表的
dt = cmd.ExecuteReader() \'读行记录
If dt.datarows.count = 0 then
msgbox("没数据")
Else
msgbox("有数据")
End If
-- 发布时间：2019/1/14 12:50:00
--
.NET Framework 版本：2.0.50727.8937
Foxtable 版本：2018.10.9.1
错误所在事件：
详细错误信息：
数据类型 ntext 和 varchar 在 equal to 运算符中不兼容。
这个是为什么呢
[此贴子已经被作者于2019/1/14 13:00:57编辑过]
-- 发布时间：2019/1/14 14:58:00
--
备注类型ntext不能直接和字符串比较。要转换，比如
convert(varchar(100), 备注列)