以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=72128)

--  作者:扶风
--  发布时间:2015/7/23 18:51:00
--  [求助]

老师 我们有一个查询表  只有一个字段  想要把它的多行的值连接成一个 字符串要怎么处理


--  作者:扶风
--  发布时间:2015/7/23 18:53:00
--  
例如 khmc列 有 AAA BBB CCC 三条记录 怎样达到如下效果 某个变量T=AAABBBCCC
--  作者:大红袍
--  发布时间:2015/7/23 19:11:00
--  

 参考 http://www.foxtable.com/help/topics/1435.htm

 


--  作者:扶风
--  发布时间:2015/7/23 20:16:00
--  

老师,如下代码执行的时候报错,至少有个参数没有指定值,请帮忙看看,谢谢!

未指定值的参数address

 

Dim Ac As String

Dim cmd2 As New SQL-Command

cmd2.Con-nection-Name = "User"

cmd2.CommandText = "S-ELECT EAccount F-rom {Users} where UserName = \'" & _UserName & "\'"

Ac = cmd2.ExecuteScalar()

 

Dim fr As String

Dim cmd3 As New SQL-Command

cmd3.Con-nection-Name = "User"

cmd3.CommandText = "S-ELECT Email F-rom {Users} where UserName = \'" & _UserName & "\'"

fr = cmd3.ExecuteScalar()

 

Dim rc As String = Forms("邮件").Controls("Receiver").Value

Dim m As New MailSender

m.Host = "192.168.1.103"

m.Account = Ac

m.Password = "123456"

m.From = fr

m.To = rc

m.Title = Forms("邮件").Controls("subject").Value

m.Content = Forms("邮件").Controls("body").Value

m.SendAsync()


--  作者:大红袍
--  发布时间:2015/7/23 20:23:00
--  

 应该是你的列名写错了

 

EAccount 、UserName 、Email