代码如下,可是执行后,总是提示:
    “未启用创建功能”
    请大侠指教,我已经陷于困境不能自拔!谢谢!  ' Open the data connection
    Set cnn1 = New ADODB.Connection
    strCnn = "Driver={SQL Server};Server=zhwei;DataBase=KMJKSystem;UID=SA;PWD=;"
    cnn1.Open strCnn    ' Create a new instance of an ADO command object
    Set datcmd1 = New ADODB.Command
    Set datcmd1.ActiveConnection = cnn1
    datcmd1.CommandText = "YearTraffic2004"
    datcmd1.CommandType = adCmdTable    ' Add the datasource to the report
    m_Report.Database.AddADOCommand cnn1, datcmd1