I am receving this error and am completely stomped as on what could be the problem with the following code. The line which the error occurs is Set rsAircraft = objConn.Execute(strSQL). It is the last line in the code I have copy and pasted. Any help will be appreciated.
Thanks,
Cameron
Error Type:
(0x80004005)
Unspecified error
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="../../Connections/mis.asp" -->
<!--#include file="../../includefiles/common.asp" -->
<%
strConnection = MM_mis_STRING
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open strConnection
strSql = "SELECT AircraftSerialNo, AircraftMDS,"
strSql = strSql + "Left(convert(char(10),PDMSchedStartDate,121),4)+s ubstring(convert(char(10),PDMSchedStartDate,121),6 ,2)+Right(convert(char(10),PDMSchedStartDate,121), 2)as PDMSchedStartDate, "
strSql = strSql + "Left(convert(char(10),PDMSchedDD250,121),4)+subst ring(convert(char(10),PDMSchedDD250,121), 6,2)+Right(convert(char(10),PDMSchedDD250,121),2) as PDMSchedDD250, "
strSql = strSql + "Left(convert(char(10),PDMSchedDelvDate,121),4)+su bstring(convert(char(10),PDMSchedDelvDate,121),6,2 )+Right(convert(char(10),PDMSchedDelvDate,121),2) as PDMSchedDelvDate, "
strSql = strSql + "Left(convert(char(10),PDMRecDate,121),4)+substrin g(convert(char(10),PDMRecDate,121),6,2)+Right(conv ert(char(10),PDMRecDate,121),2) as PDMRecDate, "
strSql = strSql + "PDMRemarks,tblAircraft.AircraftID "
strSql = strSql + "FROM PDMFC,tblAircraft "
strSql = strSql + "WHERE PDMFC.AircraftID = tblAircraft.AircraftID "
strSql = strSql + "AND (PDMFY = YEAR(GETDATE()) OR PDMFY = YEAR(GETDATE())+ 1) "
strSql = strSql + "AND (NOT (AircraftMDS IN ('N/A', 'n/a'))) ORDER BY AircraftSerialNo DESC"
Set rsAircraft = objConn.Execute(strSQL)