Code:
sub ValidateValues() DFData = "DatadField1,DatadField2,DatadField3,DatadField4,DatadField5" DFDataArry = split(DFData,",") DFTitle = "DF1Title,DF2Title,DF3Title,DF4Title,DF5Title" DFTitleArray = split(DFTitle,",")
sub ValidateValues() DFData = "DatadField1,DatadField2,DatadField3,DatadField4,DatadField5" DFDataArry = split(DFData,",") DFTitle = "DF1Title,DF2Title,DF3Title,DF4Title,DF5Title" DFTitleArray = split(DFTitle,",")
dim cquery OpenDatabaseOrder() cquery = "CREATE VIEW VIEW_OFW_New_Prog_Award_Detail" & vbcrlf cquery = cquery & "AS" & vbcrlf cquery = cquery & "SELECT " & vbcrlf cquery = cquery & "OFW_New_Programme_Awards.AwardID AS AwardID, " & vbcrlf
Leave a comment: