SQL如何将日期“2017.1.29”转化为“20170129”？

超级月亮

SQL如何将用点作为分隔符的文本形式的日期“2017.1.29”转化为8位数字“20170129”（文本格式）？

jiangxiaoyun

format函数试试

活在理想的世界

只要是用Exeel，不论是Excel对Excel还是Excel对Access或者其他，那么SQL+VBA的话SUBSTITUTE函数可以解决。

超级月亮

jiangxiaoyun 发表于 2017-12-6 15:44
format函数试试

能具体说明吗 感谢

超级月亮

活在理想的世界 发表于 2017-12-6 15:59
只要是用Exeel，不论是Excel对Excel还是Excel对Access或者其他，那么SQL+VBA的话SUBSTITUTE函数可以解决。

能写出具体的SQL语句吗 感谢

活在理想的世界

超级月亮 发表于 2017-12-6 16:11
能写出具体的SQL语句吗 感谢

这是典型查询语句，我不确定你的数据库是什么，我写了个能通用的。我用的是SPLIT，如果是删除或者插入语句，那么用SUBSTITUTE完全没问题用REPLACE也可以。反正REPLACE和SUBSTITUTE基本一样。


注意，我是用是SQL赋值给数组的方法。原因是我不确定出OFFICE以外的数据源是否支持函数。

1. Sub d()
   
2. Dim ado As New ADODB.Connection, sql As String, ar(), br()
   
3. '=======================================
   
4. ado.Open ("")
   
5. sql = "SELECT * FROM [数据]"
   
6. ar = WorksheetFunction.Transpose(ado.Execute(sql).GetRows)
   
7. ado.Close
   
8. '========================================
   
9. ReDim br(UBound(ar), UBound(ar, 2))
   
10. For i = LBound(ar) To uboun(ar)
    
11.     br(i, 1) = Split(ar(i, 1), ".")(0) & Format(Split(ar(i, 1), ".")(1), "00") & Format(Split(ar(i, 1), ".")(2), "00")
    
12. Next
    
13. End Sub

复制代码

活在理想的世界

超级月亮 发表于 2017-12-6 16:11
能写出具体的SQL语句吗 感谢

如果是Excel对Excel的话，那么 可以直接在字段上用工作表函数的。

这个我已经做过实验的，基本上所有的文本函数都可以直接在字段上用。