strSQL = "类别_Insert ( " & intID & "," & intUPID  ")"
    gcnnQA.Execute strSQL, , adCmdStoredProc
有日期型的格式应该怎样写??
    dtaTemp---为日期类型
    strSQL = "类别_Insert ( " & intID & "," & intUPID & "'" & dtaTemp  ")"
    
'+++++++++++++++++++
    strsql = "begin " & strsql & "; end;"
'++++++++++++++++++++    gcnnQA.Execute strSQL, , adCmdStoredProc 出错了??