Dim fso, file1
Dim pkg
SET pkg = DTSGlobalVariables.Parent

Set fso = CreateObject("Scripting.FileSystemObject")

IF (fso.FileExists("c:\abc.txt")) THEN
Msgbox "File exist. Continue"
pkg.Steps("DTSStep_DTSActiveScriptTask_2").DisableStep=False

Set fso= Nothing

ELSE
Msgbox "Stop"
pkg.Steps("DTSStep_DTSActiveScriptTask_2").DisableStep=True
END IF
set pkg=nothing
Main = DTSTaskExecResult_Success

SELECT
T0.ItemCode AS 'Item',
T0.ItemName AS 'Name',
CASE
WHEN T0.QryGroup37 = 'Y' THEN 'FG'
WHEN T0.QryGroup48 = 'Y' THEN 'SA'
WHEN T0.QryGroup11 = 'Y' THEN 'RAW'
END AS 'RAW-SA-FG',
T1.ItmsGrpNam AS 'Group',

CASE
WHEN T0.QryGroup55 = 'Y' THEN 'x - No Recount Need'
WHEN T0.QryGroup56 = 'Y' AND T0.QryGroup12 = 'N' THEN 'Ilya (Plastic)' /* Not CO2 */
WHEN T0.QryGroup56 = 'Y' AND T0.QryGroup12 = 'Y' THEN 'Ilya (CO2)' /* CO2 */
WHEN T0.QryGroup57 = 'Y' THEN 'Sofi (Chemical)'
WHEN T0.QryGroup58 = 'Y' THEN 'Ilya (Electronic)'
WHEN T0.QryGroup59 = 'Y' THEN 'Alex (Laboratory)'
WHEN T0.QryGroup60 = 'Y' THEN 'Shay (Salt)'
END AS 'Dept Manager',

CASE
WHEN T0.QryGroup12 = 'Y' THEN 'CO2'
WHEN T0.QryGroup13 = 'Y' THEN 'Ozonizers'
WHEN T0.QryGroup14 = 'Y' THEN 'Controllers'
WHEN T0.QryGroup15 = 'Y' THEN 'Heating'
WHEN T0.QryGroup18 = 'Y' THEN 'Berlin'
WHEN T0.QryGroup19 = 'Y' THEN 'Prizm'
WHEN T0.QryGroup20 = 'Y' THEN 'Prizm Pro'
WHEN T0.QryGroup22 = 'Y' THEN 'Merlin'
WHEN T0.QryGroup29 = 'Y' AND T0.QryGroup60 = 'Y' THEN 'Marine'
WHEN T0.QryGroup30 = 'Y' AND T0.QryGroup60 = 'Y' THEN 'Fresh'
WHEN T0.QryGroup24 = 'Y' AND T0.QryGroup57 = 'Y' THEN 'Food'
ELSE '--'
END AS 'Type',

CASE
WHEN T0.QryGroup38 = 'Y' THEN 'Labels'
WHEN T0.QryGroup39 = 'Y' THEN 'Charts'
WHEN T0.QryGroup40 = 'Y' THEN 'Bottles'
WHEN T0.QryGroup41 = 'Y' THEN 'Boxes'
WHEN T0.QryGroup42 = 'Y' THEN 'Manual'
WHEN T0.QryGroup52 = 'Y' THEN 'Packing'
WHEN T0.QryGroup54 = 'Y' THEN 'Box-Outer'
WHEN T0.QryGroup63 = 'Y' AND T0.QryGroup60 = 'Y' THEN 'Bulk Packs'
ELSE '--'
END AS 'SubType',

CAST(T0.SellItem AS VARCHAR(5)) AS 'Sale',
CAST(T0.QryGroup33 AS VARCHAR(5)) AS 'Import',
CAST(T0.TreeType AS VARCHAR(5)) AS 'Tree Type',
CAST(T0.PrchseItem AS VARCHAR(5)) AS 'Purchase'

FROM OITM T0
INNER JOIN OITB T1 ON T0.ItmsGrpCod = T1.ItmsGrpCod

WHERE T0.Canceled ='N' AND
T0.InvntItem = 'Y' AND
( T0.QryGroup58 = 'Y' AND T0.ItemName LIKE '%Zone%' )

ORDER BY T0.ItemCode

exec sp_attach_db @dbname = 'Portal', @filename1 ='C:\Program Files\Microsoft SQL Server\MSSQL$VISHAL\Data\Portal.mdf', @filename2 ='C:\Program Files\Microsoft SQL Server\MSSQL$VISHAL\Data\Portal_log.LDF'
go

exec sp_detach_db 'Portal'
go

SELECT * FROM sys.dm_os_cluster_nodes

SELECT SERVERPROPERTY('ComputerNamePhysicalNetBIOS') ActiveNode

SELECT title, price,
Budget = CASE price
WHEN price > 20.00 THEN 'Expensive'
WHEN price BETWEEN 10.00 AND 19.99 THEN 'Moderate'
WHEN price < 10.00 THEN 'Inexpensive'
ELSE 'Unknown'
END,
FROM titles

Instead of DTSGlobalVarialbes("gVar"), put DTSGlobalVarialbes("gVar").Value

osql -E -S "mycomputer\instance" -Q "sp_grantlogin 'mycomputer\ASPNET'"
osql -E -S "mycomputer\instance" -d dbname -Q "sp_grantdbaccess 'mycomputer\ASPNET'"
osql -E -S "mycomputer\instance" -d dbname -Q "sp_addrolemember 'db_owner', 'mycomputer\ASPNET'"

CREATE FUNCTION [dbo].[fn_FileExists] (@FileName nvarchar(255))
RETURNS bit AS
BEGIN
DECLARE @FS int
DECLARE @FileID int
DECLARE @OLEResult int
declare @Exists bit

EXECUTE @OLEResult = sp_OACreate 'Scripting.FileSystemObject', @FS OUT
IF @OLEResult <> 0
BEGIN
RETURN 0
END

EXECUTE @OLEResult = sp_OAMethod @FS, 'FileExists', @Exists OUT, @FileName

IF @OLEResult <> 0
BEGIN
return 0
END
EXECUTE @OLEResult = sp_OADestroy @FS

return @Exists

END

Dim fso, file1
Dim pkg
SET pkg = DTSGlobalVariables.Parent

Set fso = CreateObject("Scripting.FileSystemObject")

IF (fso.FileExists("c:\abc.txt")) THEN
Msgbox "File exist. Continue"
pkg.Steps("DTSStep_DTSActiveScriptTask_2").DisableStep=False

Set fso= Nothing

ELSE
Msgbox "Stop"
pkg.Steps("DTSStep_DTSActiveScriptTask_2").DisableStep=True
END IF
set pkg=nothing
Main = DTSTaskExecResult_Success