主题：阿里云邮箱

有可能是你多了空格,尝试使用 

好像这个错误被记忆了，自从出了这个报错后，再发送其他行也报同样的错误。

 

请问能提供远程在线帮助吗？ 因为是在真实数据库上边做边用，如果上传实列还需要重定向数据库等。

你联系客服远程吧 800014337

谢谢bin和小余的帮助，果然是运行中代码带来的空格岛的鬼。11楼的方法正是对症下药。

 

感受到了Foxtable论坛的支持服务体验，也第一次享受到了Foxtable给工作带来的乐趣，一下发送了数百封邮件。分享个截屏给大家吧。

 

另外再请教一个问题：下面这句错在哪里？报错：没有可访问的fill接受此数目的参数，因此重载决策失败。

Dim tel As String
tel = Tables("邮件平台_Table2").Current("电子邮箱")
Tables("邮件平台_Table1").Fill("Select * From {邮件列队} where [发送日期] Is Not null And [电子邮箱] = '"&Tel&"'" ,"qiyundata",True)

 

 

此主题相关图片如下：捕获.png

你确定你的表是SQLTABLE么?  

表类型选择的是sqltable, 原来拼接代码中有空格的，刚才在找问题时，删除了。谢谢！

将表更换为sqlquerry后，运行正常了。

再请教一个符号：通过executescalar从SQL获取的日期与Date.Today.AddDays(-9)通过定义变量后的比较，是否应该用#，想确认一下，还是用单引号？

下面代码中最后一句红色的对吗？

 

 

            Dim ld As Date
            Dim dzyx As String
            dzyx = Tables("邮件平台_Table2").Current("电子邮箱")
            Dim cmd As New SQLCommand
            cmd.C
            cmd.CommandText = "Select Max(发送日期) From {邮件列队} Where [电子邮箱] =  '" & dzyx & "'"
            ld = cmd.ExecuteScalar()
            Dim dt1 As  Date = Date.Today.AddDays(-9) ' 10天前
            messagebox.show(dt1 & ld & "test")
            If "#" & ld & "#" < "#" & dt1 & "#" Then '10天内无发送,避免同一邮箱过度营销,同时通过限制避免错误的重复发送

# 只是在表达式的时候使用.代码中使用是不需要的. 直接用变量做比较即可

谢谢！

 

还有一个小问题请教：

 

副本tables("邮件平台_Table2).current.save() 保存的是副本table的当前行，请问如何保存绑定的表tables("邮件列队")的datatables("邮件列队")当前行

 

用datatables("邮件列队").save() 可以， 但效率要比仅保存当前行低。