Monday, October 17, 2011

EXCEL :: MS-Excel Print Preview displays the size of postage stamp

Q:   Excel Print Preview shows up the size of a postage stamp

A:   change your default printer.  If you only have a single printer installed, then install another and make it the default.  View the print preview using the new printer.  Then, you can change the default printer back to the original.

Change CSS dynamically in javascript

// this simply appends the following words
//document.getElementById("message").className += "MyClass";
                                               
// this removes the words and sets border and background to White.
document.getElementById("message").className = "message";
document.getElementById("message").innerHTML = ' ';

Re-establish Identity column in MS-SQL Server (RESEED)

USE dbname
GO
DBCC CHECKIDENT (tablename, RESEED, 0)
GO

Friday, October 14, 2011

ColdFusion elimination of double quotes

<cfset mylist = Replace(Form.chkNumberList, '#chr(44)#', "'#chr(44)#'", "All")>
                                                               

<CFQUERY name="qryMarkAsPaid" datasource="#Session.DSN#">
     UPDATE dbo.table
     SET status = 99
       , PaidDate = GetDate()
     WHERE myNumber IN ('#REReplace(mylist, "''", "'", "ALL")#')
</CFQUERY>

Friday, September 30, 2011

T-SQL JOIN Update

SQL Server

UPDATE bh 

SET bh.EndDate = t.EndDate -- SELECT *

FROM Tasks t INNER JOIN BilletHours bh 

     ON bh.Contract = t.Contract 
     AND bh.TaskNumber = t.TaskNumber
     AND bh.Subtask = t.Subtask
WHERE t.Contract = '99'
     AND t.TaskNumber IN ('IND','H','PTO')

MS-Access

UPDATE _Tbl_Comments_Import x INNER JOIN dbo_tbl_Comments_Import tci ON tci.ID = x.ID
SET x.CommentCategory = [tci].[CommentCategory]
, x.CommentReviewed = [tci].[CommentReviewed]
, x.Impactful = [tci].[Impactful]
, x.Scrubbed = [tci].[Scrubbed]
, x.Sentiment = [tci].[Sentiment]
, x.Key_Phrase_I = [tci].[Key_Phrase_I]
, x.Key_Phrase_II = [tci].[Key_Phrase_II]
, x.Key_Phrase_III = [tci].[Key_Phrase_III]
, x.Scrubbed_Comment = [tci].[Scrubbed_Comment];

UPDATE [*Tbl_Demographics_Import] x INNER JOIN dbo_tbl_Demographics_Import tci ON tci.respid = x.respid
SET x.USMarket = [tci].[USMarket]
WHERE x.USMarket = 0 

Friday, October 1, 2010

SharePoint (WSS) Portal Email Merge


This is used to copy email addresses from a WSS portal and insert them into another database using a cursor.


use SP_Content_db

SELECT right(tp_Login,9) as 'login'
     , tp_Title
     , tp_Email as 'EmailAddress'    
     , tp_ExternalTokenLastUpdated
     , e.EmployeeID, CurrentEmployee
     , e.firstname, e.lastname
     , TMSv4.dbo.fn_EmployeeName(e.EmployeeID) as 'EmployeeName'
INTO #SharePoint
FROM SP_Content_db.dbo.UserInfo ui RIGHT OUTER JOIN Employees e ON right(ui.tp_Login,9) COLLATE DATABASE_DEFAULT =e.EmployeeID
WHERE tp_email COLLATE DATABASE_DEFAULT NOT LIKE 'webmaster%'
     AND tp_login COLLATE DATABASE_DEFAULT NOT LIKE '%.%'
     AND Right(tp_Login,10) COLLATE DATABASE_DEFAULT LIKE ':%'
--     AND currentemployee = 1

DECLARE @EmployeeID varchar(9)
DECLARE @EmailAddress varchar(100)

-- ########################################################################
DECLARE myCursor CURSOR FORWARD_ONLY READ_ONLY FOR

SELECT EmployeeID, EmailAddress
FROM #SharePoint

OPEN myCursor

     FETCH NEXT FROM myCursor
     INTO @EmployeeID, @EmailAddress
    
     WHILE @@FETCH_STATUS = 0
     BEGIN    
         
          UPDATE TMSv4.dbo.Employees
          SET EmailAddress = @EmailAddress
          WHERE EmployeeID = @EmployeeID
                                     
          -- Get the next record.
          FETCH NEXT FROM myCursor
          INTO @EmployeeID, @EmailAddress
     END

CLOSE myCursor
DEALLOCATE myCursor

drop table #SharePoint

Sunday, October 18, 2009

SQL Server Compabibility Level

ALTER DATABASE [dbname]
SET compatibility_level = 90;

use master
select * from sys.Databases

Thursday, July 9, 2009

Encrypt into database

if exists (select * from sysobjects where id = object_id('dbo.Reaffirm') and sysstat & 0xf = 4)
     drop procedure dbo.Reaffirm
GO
SET QUOTED_IDENTIFIER ON
GO
SET ANSI_NULLS ON
GO
/*######################################################################################################

USED:     reafffirmation of

FUNCTIONS USED:  master.dbo.fn_encrypt_aes(CAST(@DateSubmitted AS VARBINARY(64)), 'LOCAL_test_web', NULL, 256)

DATE          ID     SCR#            DESCRIPTION
----------    ---    -----------     -----------------------------------------------------------------------
2009.07.09    wdb                    created.

###########################################################################################################*/

CREATE PROCEDURE dbo.Reaffirm
       @SegmentID int
     , @FirstName varchar(50)
     , @LastName varchar(50)
     , @EmployeeID int
     , @Affirmed varchar(10)
     , @DateSigned smalldatetime
     , @DateSubmitted smalldatetime
     , @IsDeleted varchar(10)
AS
/*
exec dbo.Reaffirm 1, 'William', 'Benson', '23609', 'yeah', '12/25/2009', '12/24/2009', 'nope'

SELECT * from Reaffirmation WHERE lastname = 'Benson'
*/

INSERT INTO Business_Conduct_Reaffirmation.dbo.Reaffirmation (SegmentID, FirstName, LastName
          , EmployeeNumber, Affirmed, DateSigned, DateSubmitted, IsDeleted)
VALUES (@SegmentID
     , @FirstName
     , @LastName
     , @EmployeeID
     , @Affirmed
     , @DateSigned
     , master.dbo.fn_encrypt_aes(CAST(@DateSubmitted AS VARBINARY(64)), 'LOCAL_test_web', NULL, 256)
     , @IsDeleted)

GO

SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO

Friday, June 12, 2009

DBCC TraceOn error

If you happen to be using Microsoft Query, you may receive the DBCC TraceOn error and the following may help.

BAD
'strCn = "Provider=MSDASQL; DRIVER={SQL Server}; SERVER=[dbservername]; UID=[userid]; Pwd=**********; APP=Microsoft® Query; DATABASE=[dbname]; Trusted_Connection=yes; "

GOOD
 strCn = "DRIVER=SQL Server;SERVER=[dbservername]; APP=Microsoft® Query; DATABASE=[dbname] ;Uid=[userid];Pwd=******************;"

Tuesday, May 19, 2009