以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  [求助]生日设置出错  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=81650)
--  作者：yinss0518
--  发布时间：2016/3/2 18:24:00
--  [求助]生日设置出错
我想设置生日提醒功能，结果写出来后，发现 如果我的日期格式只显示  几号的时候，这个代码有用，但是当我日期格式是 1988-2-11 的时候，提示出错：Cannot perform \'=\' operation on System.DateTime and System.String.



Dim dt As String = Date.Today.Day
Dim dr As DataRow = DataTables("汇众汽修客户管理系统").Find("生日 = \'" & dt & "\'")
If dr IsNot Nothing Then
    MessageBox.Show("有客户生日了,赶快祝福客户吧!","重要提醒",MessageBoxButtons.OK,MessageBoxIcon.Information)
    Tables("汇众汽修客户管理系统").Filter = "生日 = \'" & dt & "\'"
    MainTable = Tables("汇众汽修客户管理系统")
End If


这是我的代码。。。求指教。。。在线急等
--  作者：yinss0518
--  发布时间：2016/3/2 18:25:00
--  
我的生日列  是用的日期格式    
--  作者：大红袍
--  发布时间：2016/3/2 18:35:00
--  

看看这里吧

 

http://www.foxtable.com/help/topics/2476.htm