<从数据库提出数据问题>access表中有一个字段"日期",数据类型设为:日期/时间.
假设里面有个字段为:1998-12-30我想把这个字段的"月"提出来赋值到变量A中,请问怎么办?
我知道怎么样把这个字段提出来。可是,我想把它分开。就像date分开年月日是year(date),month(date),day(date)一样怎么样把表中的1998-12-30提出来。分别赋值到三个变量(年,月,日)里面了。

解决方案 »

  1.   

    ACCESS中有这们的函数:
    select year(日期) as 年
    select month(日期) as 月
    select day(日期) as 日dim intyear as integer
    dim intmonth as integer
    dim intday as integerdim rs as adodb.recordset
    rs=cnn.execute("select year(日期) as 年,month(日期) as 月,day(日期) as 日 from 表")intyear=rs!年
    intmonth=rs!月
    intday=rs!日
      

  2.   

    select month(日期),day(日期),year(日期) from 表
      

  3.   

    select month(日期) as 月
      

  4.   


            VB   + access表中有一字段  "到期日期"   字段类型为 日期/时间  里面有一个字段为2002-10-10 
     我想把这个字段的“2002”,"10" ,"10" 提出来。赋值到vb中的变量,aa,  bb,  cc 中,请教大家我该怎么做。 
      

  5.   

    还有一个问题。access表中有一个字段"车牌号".里面的字段,模似如下:
                     车牌号
                       aa
                       bb
                       cc
                       aa
                       dd
                       aa
                       ee
                       gg
                       bb
                       cc求:用SQL语句,算出有多少个车牌号。赋值到变量     numzl 中,
         注意,"车牌号"字段中,有重复的车牌号。
    帮帮忙
      

  6.   

    select month(日期) as 月
      

  7.   

    取出“到期日期”字段来,赋给strDate
    然后aa=DatePart("yyyy", strDate) 
        bb= DatePart("m", strDate) 
        cc=DatePart("d", strDate)
      

  8.   

    select count(车牌号) as numz1 from 表名
      

  9.   

    试一下用这样 mid$(rs.fields("日期").value,6,2)当然如果是短日期的
    就不能用这样了
        i = InStr(1, rs4.Fields(12).Value, "-")
            Year = Left$(rs.Fields("日期").Value, i - 1) 
            A = Mid$(rs.Fields("日期").Value, i + 1)我这里是可以做到的
    你自己试一下咯
      

  10.   

    车牌号问题:
    SELECT COUNT(DISTINCT 车牌号) AS numz1 FROM 表
      

  11.   

    access表中有一个字段"车牌号".里面的字段,模似如下:
                     车牌号
                       aa
                       bb
                       cc
                       aa
                       dd
                       aa
                       ee
                       gg
                       bb
                       cc求:用SQL语句,算出有多少个车牌号。我想把统计出来的数据赋值到label1.capiton中。
    请问????????
    注意,"车牌号"字段中,有重复的车牌号。
    帮帮忙
      

  12.   

    搞定了。
    是这样的。在access中。这个语句是可行的。
    sql(access) = "SELECT COUNT(车牌号) AS Num FROM (SELECT DISTINCT 车牌号 FROM tx)"
      

  13.   

    同期问题:
    怎么样把库中的数据提出来。显示在datagrid中。 
    条件是"到期日期"为本月,.
      

  14.   

    '工程->引用Microsoft ActiveX Data Objects 2.x Library
    Option Explicit
        Public mCnnString As String
        Dim mRst As New ADODB.RecordsetPrivate Sub Form_Load()
        mCnnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db1.mdb" & ";Persist Security Info=False"
        mRst.CursorLocation = adUseClient
    End SubPrivate Sub Command1_Click()   '显示
    On Error GoTo mErr
        mRst.Open "Select * From Table1", mCnnString, adOpenStatic, adLockOptimistic, adCmdText    '不清楚你的数据库表,SQL语句你自己写吧
        Set DataGrid1.DataSource = mRst
    Exit Sub
    mErr:
        MsgBox Err.Number & "," & Err.Description, vbCritical + vbOKOnly
        End
    End SubPrivate Sub Form_Unload(Cancel As Integer)
        If mRst.State = adStateOpen Then
            mRst.Close
            Set mRst = Nothing
        End If
    End Sub
      

  15.   

    大哥,
    我就要SQL语句。条件是"到期日期"为本月
    select * from TX where 到期日期......
    后面怎么写呀
      

  16.   

    大哥,
    我就要SQL语句。条件是"到期日期"为本月
    select * from TX where 到期日期......
    后面怎么写呀条件是"到期日期"为本月
      

  17.   

    select * from tx where 到期日期<= Date
      

  18.   

    date是调用系统日期。
    我是想条件是 本月的比喻说。这个月是2004年10月我想知道我库中字段  到期日期  是本月的。请问这条SQL语句。谢谢大家