21/11/2007 13:33:28 v1.3545 - Cannot drop the index 'WebPages.IX_WebPages_Title', because it does not exist or you do not have permission Continue or restart VDM - This error was queued for analysis, we apologize. -------------- -- WebPages -- -------------- if exists ( select * from INFORMATION_SCHEMA. 0001:002310A0 axView.txView.ExecuteSql line 8256 0001:001E6140 axView.txTree.DoOnExpanding line 2353 base: 00D11000 -------------- -- WebPages -- -------------- if exists ( select * from INFORMATION_SCHEMA.COLUMNS where Table_Name = 'WebPages' AND Column_Name = 'Template_Name' ) begin alter table WebPages alter column Template_Name varchar( 50 ) NULL execute dbo.DropDefault 'WebPages', 'Title' drop index IX_WebPages_Title on WebPages alter table WebPages alter column Title varchar( 50 ) NOT Null alter table WebPages add default( NewID() ) for Title end 20/11/2007 21:40:50 v1.3545 - The conversion of a char data type to a datetime data type resulted in an out-of-range datetime value Continue or restart VDM - This error was queued for analysis, we apologize. update WebPages set [Date_Modified]='19/10/2007 19:01:55' where [ID]=12581 0001:0001E6E8 ComObj.DispCallError line 1795 0001:00242D2C axVDM.Finalization line 54 base: 00D11000 update WebPages set [Date_Modified]='19/10/2007 19:01:55' where [ID]=12581 13/11/2007 21:50:18 v1.3536 - Operation is not allowed when the object is closed Continue or restart VDM - This error was queued for analysis, we apologize. select [ID],[GUID],[Date_Created],[Date_Modified],rTrim( isnull( Date_Created, '' ) ) + ' - ' + rTri 0001:001EE4A4 axView.txTree.LoadValues line 3159 0001:0021F02C axView.txView.GetBlobAsString line 6616 base: 00D11000 select [ID],[GUID],[Date_Created],[Date_Modified],rTrim( isnull( Date_Created, '' ) ) + ' - ' + rTrim( isNull( Date_Modified, '' ) ) + ' by ' + rTrim( UserName ) + ' on ' + rTrim( WorkStation ) as Created_Modified,[Title],[Title_Languages],[Template_Name],[Default_Template_Name],[Destination_URL],[Local_Path],[Original_URL],Cast( Note as VarChar( 1000 ) ) as [Note],Cast( Meta_Description as VarChar( 1000 ) ) as [Meta_Description],Cast( Meta_Keywords as VarChar( 1000 ) ) as [Meta_Keywords],[FTP_URL],[FTP_Path],[FTP_Username],[FTP_Password] from WebSites where [ID]=39 13/11/2007 21:50:13 v1.3536 - Operation is not allowed when the object is closed Continue or restart VDM - This error was queued for analysis, we apologize. select [ID],[GUID],[Date_Created],[Date_Modified],rTrim( isnull( Date_Created, '' ) ) + ' - ' + rTri 0001:001EE4A4 axView.txTree.LoadValues line 3159 0001:0021F02C axView.txView.GetBlobAsString line 6616 base: 00D11000 select [ID],[GUID],[Date_Created],[Date_Modified],rTrim( isnull( Date_Created, '' ) ) + ' - ' + rTrim( isNull( Date_Modified, '' ) ) + ' by ' + rTrim( UserName ) + ' on ' + rTrim( WorkStation ) as Created_Modified,[Title],[Title_Languages],[Template_Name],[Default_Template_Name],[Destination_URL],[Local_Path],[Original_URL],Cast( Note as VarChar( 1000 ) ) as [Note],Cast( Meta_Description as VarChar( 1000 ) ) as [Meta_Description],Cast( Meta_Keywords as VarChar( 1000 ) ) as [Meta_Keywords],[FTP_URL],[FTP_Path],[FTP_Username],[FTP_Password] from WebSites where [ID]=39 13/11/2007 21:49:51 v1.3536 - Operation is not allowed when the object is closed Continue or restart VDM - This error was queued for analysis, we apologize. select [ID],[GUID],[Date_Created],[Date_Modified],rTrim( isnull( Date_Created, '' ) ) + ' - ' + rTri 0001:001EE4A4 axView.txTree.LoadValues line 3159 0001:0023D2A8 axView.txPlayer.ClickButton line 9403 base: 00D11000 select [ID],[GUID],[Date_Created],[Date_Modified],rTrim( isnull( Date_Created, '' ) ) + ' - ' + rTrim( isNull( Date_Modified, '' ) ) + ' by ' + rTrim( UserName ) + ' on ' + rTrim( WorkStation ) as Created_Modified,[Title],[Title_Languages],[Template_Name],[Default_Template_Name],[Destination_URL],[Local_Path],[Original_URL],Cast( Note as VarChar( 1000 ) ) as [Note],Cast( Meta_Description as VarChar( 1000 ) ) as [Meta_Description],Cast( Meta_Keywords as VarChar( 1000 ) ) as [Meta_Keywords],[FTP_URL],[FTP_Path],[FTP_Username],[FTP_Password] from WebSites where [ID]=39 13/11/2007 21:49:46 v1.3536 - Operation is not allowed when the object is closed Continue or restart VDM - This error was queued for analysis, we apologize. select [ID],[GUID],[Date_Created],[Date_Modified],rTrim( isnull( Date_Created, '' ) ) + ' - ' + rTri 0001:001EE4A4 axView.txTree.LoadValues line 3159 0001:0021EC44 axView.txView.GetData line 6611 base: 00D11000 select [ID],[GUID],[Date_Created],[Date_Modified],rTrim( isnull( Date_Created, '' ) ) + ' - ' + rTrim( isNull( Date_Modified, '' ) ) + ' by ' + rTrim( UserName ) + ' on ' + rTrim( WorkStation ) as Created_Modified,[Title],[Title_Languages],[Template_Name],[Default_Template_Name],[Destination_URL],[Local_Path],[Original_URL],Cast( Note as VarChar( 1000 ) ) as [Note],Cast( Meta_Description as VarChar( 1000 ) ) as [Meta_Description],Cast( Meta_Keywords as VarChar( 1000 ) ) as [Meta_Keywords],[FTP_URL],[FTP_Path],[FTP_Username],[FTP_Password] from WebSites where [ID]=39 13/11/2007 21:49:32 v1.3536 - Operation is not allowed when the object is closed Continue or restart VDM - This error was queued for analysis, we apologize. select [Local_Path] from WebPages where [ID]=12587 0001:0021D470 axView.txView.HintForTree line 6472 0001:0021F69C axView.txView.BlobAsString line 6676 base: 00D11000 select [Local_Path] from WebPages where [ID]=12587 08/11/2007 21:45:16 v1.3489 - Invalid column name 'Destination_URL' Continue or restart VDM - This error was queued for analysis, we apologize. select [Destination_URL] from Notes where [ID]=7409 0001:0022D00C axView.txView.ExecuteRS line 8110 0001:0018FCE8 axPopup.txPopup.DoOnClick line 1050 base: 00D11000 select [Destination_URL] from Notes where [ID]=7409 06/11/2007 10:49:46 v1.3489 - The conversion of a char data type to a datetime data type resulted in an out-of-range datetime value Continue or restart VDM - This error was queued for analysis, we apologize. update WebPages set [Date_Modified]='15/10/2007 16:06:39' where [ID]=13753 0001:0001E6C8 ComObj.DispCallError line 1795 0001:0023F4B8 axVDM.Finalization line 54 base: 00D11000 update WebPages set [Date_Modified]='15/10/2007 16:06:39' where [ID]=13753 17/10/2007 21:35:51 v1.3469 - There is already an object named 'MinDate' in the database Continue or restart VDM - This error was queued for analysis, we apologize. create function dbo.MinDate( @Value1 datetime, @Value2 datetime ) returns datetime begin if @V 0001:002326B0 axView.txView.ExecuteSql line 8183 0001:001E96F4 axView.txTree.DoOnExpanding line 2346 base: 00D11000 create function dbo.MinDate( @Value1 datetime, @Value2 datetime ) returns datetime begin if @Value2 is Null OR @Value1 < @Value2 return @Value1 return @Value2 end 15/10/2007 11:26:39 v1.3445 - Line 10: Incorrect syntax near 'GO' Continue or restart VDM - This error was queued for analysis, we apologize. -------------- -- WebSites -- -------------- --if ( select [Value] from ::fn_listextendedpr 0001:00230F90 axView.txView.ExecuteSql line 8124 0001:001E9070 axView.txTree.DoOnExpanding line 2348 base: 00D11000 -------------- -- WebSites -- -------------- --if ( select [Value] from ::fn_listextendedproperty( 'Version', default, default, default, default, default, default ) ) > '1.0' begin -- NEW v1.1 file formats if exists ( select * from sysobjects where [Name] = 'HTML_Template' AND [Type] = 'FN' ) drop function dbo.HTML_Template GO if exists ( select * from sysobjects where [Name] = 'WebSites_Insert' AND [Type] = 'TR' ) drop trigger WebSites_Insert GO create trigger WebSites_Insert on WebSites for insert as if ( select Count( ID ) from Inserted ) > 0 begin -- update main page next update WebSites set Template_Name = 'VDM_Word_Content', Default_Template_Name = 'VDM_Word_Content', Local_Path = 'HTML\' + dbo.SubstFileName( I.Title ) + '\', Photo2Name = 'HTML\' + dbo.SubstFileName( I.Title ) + '\Index_Content.htm', Photo2 = 'Under Construction' + Char( 13 ) + Char( 10 ), Destination_URL = 'index.htm', FTP_URL = 'ediaccess.com', FTP_Username = dbo.SubstFileName( I.Title ), FTP_Password = dbo.SubstFileName( I.Title ) + '.vdm' from Inserted I join WebSites S on S.[ID] = I.[ID] where S.Destination_URL is Null ------------------------------------------------------------- -- Force the Business Rules in the Update triggers to fire -- ------------------------------------------------------------- update WebSites set Date_Modified = I.Date_Modified from Inserted I join WebSites W on W.[ID] = I.[ID] end GO if exists ( select * from sysobjects where [Name] = 'WebSites_Update' AND [Type] = 'TR' ) drop trigger WebSites_Update GO create trigger WebSites_Update on WebSites for update as if ( select Count( ID ) from Inserted ) > 0 begin update WebSites set Template_ID = T.[ID] from Inserted I join WebSites W on W.[ID] = I.[ID] join Deleted D on D.[ID] = I.[ID] join WebPages T on T.Title = I.Template_Name where I.Template_Name <> isNull( D.Template_Name, '' ) OR I.Date_Modified is Null -- Null indicates a call from the Insert trigger update WebSites set Default_Template_ID = T.[ID] from Inserted I join WebSites W on W.[ID] = I.[ID] join Deleted D on D.[ID] = I.[ID] join WebPages T on T.Title = I.Default_Template_Name where I.Default_Template_Name <> isNull( D.Default_Template_Name, '' ) OR I.Date_Modified is Null -- Null indicates a call from the Insert trigger update WebSites set Destination_URL = dbo.TrimNonAscii( W.Destination_URL ), Local_Path = 'HTML\' + dbo.SubstFileName( I.Title ) + '\' from Inserted I join WebSites W on W.[ID] = I.[ID] update WebSites set Destination_Path = dbo.InternetPath( W.Destination_URL ) from Inserted I join WebSites W on W.[ID] = I.[ID] ------------------------------------------------------------------------------------------------------------------ -- Update the Date_Modified last since when it is Null it is used to detect Inserted records in Update triggers -- ------------------------------------------------------------------------------------------------------------------