Foxtable(狐表)用户栏目专家坐堂 → 求一个SQL语句


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

主题:求一个SQL语句

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


加好友 发短信
等级:八尾狐 帖子:1812 积分:12999 威望:0 精华:14 注册:2008/10/11 18:07:00
  发帖心情 Post By:2014/4/8 14:40:00 [显示全部帖子]

狐表与SQL结合方法:

Dim s1,sql As String
Dim Arys As List(Of String())
Arys = DataTables("原表").SQLGetValues("列B|编码|列A","列B > ''")
s1=" Union All Select 编码,列A,'T0' As 列B From{原表} Where 编码 = 'T1' and 列A ='T2'"

For Each Ary As String() In Arys
    sql+ = s1.Replace("T0",Ary(0)).Replace("T1",Ary(1)).Replace("T2",Ary(2))
Next

If SQL > "" Then
    Output.show(SQL.Substring(11))
End If

 回到顶部