Foxtable(狐表)用户栏目专家坐堂 → 列中能否有动态变量?


  共有2162人关注过本帖树形打印复制链接

主题:列中能否有动态变量?

帅哥哟,离线,有人找我吗?
逛逛
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:1693 积分:12123 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2017/4/8 12:13:00 [显示全部帖子]

或许可以用 Var变量过渡一下


dim str as string  = "se lect * from 订单 where 录入部门 = '" & Vars(dr("flt")) & "'"

 回到顶部
帅哥哟,离线,有人找我吗?
逛逛
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:1693 积分:12123 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2017/4/8 12:48:00 [显示全部帖子]

那只是一个文本的分割拼接操作而已

 回到顶部
帅哥哟,离线,有人找我吗?
逛逛
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:1693 积分:12123 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2017/4/8 20:58:00 [显示全部帖子]

还是写一个吧

Dim s As String = dr("flt")
Dim ss() As String = s.Split("&")
Dim s3 As String = " "
Dim s4 As String
For i As Integer = 0 To ss.Length - 1
    If  i Mod 2 = 0 Then
        s4 = ss(i).TrimEnd(""""," ")
        If i > 0 Then
            s4 =   s4.TrimStart(" ","""")
        End If        
        s3 += s4
    Else
        s3 +=  Vars(ss(i).Trim())        
    End If
    'Output.show(s3)
Next
dim str as string = "sel ect * from 订单 where "  & s3

 回到顶部
帅哥哟,离线,有人找我吗?
逛逛
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:版主 帖子:1693 积分:12123 威望:0 精华:7 注册:2013/7/11 10:52:00
  发帖心情 Post By:2017/4/10 9:51:00 [显示全部帖子]

6楼的代码就是根据楼主的条件写的,只要格式不变,多个条件也行。前提是要用Var变量(我没检查变量是否存在)。
楼主可以测试一下。


当然楼主的方法,个人认为不是很方便。我会另开贴说明我的建议。

 回到顶部