Function Main()
	dim scmd	
	dim status_flag

	scmd = "select dim_product_id from [dbo].[date_table] where dim_product_id = "
	scmd = scmd +  DTSSource("Col002")
	status_flag = exec(scmd)

	if status_flag  <> 0 then
		Main = DTSTransformstat_UpdateQuery
	else
		Main = DTSTransformstat_InsertQuery
	end if
End Function

quote:

---

Gordon writes "I am using DTS from the Enterprise Manager.

I am using a Data Driven Query, and I want to process each record on the text file and either update an existing row or create a new row.

I have been trying to use an activex script behind the Transformation tab to return DTSTransformstat_UpdateQuery or DTSTransformstat_InsertQuery. This in turn will be picked up by the Query tab wihich will run an update or insert.

I am having trouble in the activex script, connecting to the database to run the select and then testing to see if a row is on the database.

Function Main()
	dim scmd	
	dim status_flag

	scmd = "select dim_product_id from [dbo].[date_table] where dim_product_id = "
	scmd = scmd +  DTSSource("Col002")
	status_flag = exec(scmd)

	if status_flag  <> 0 then
		Main = DTSTransformstat_UpdateQuery
	else
		Main = DTSTransformstat_InsertQuery
	end if
End Function

Hoping you can help"

---