Convert Activex Scripts to VB / C# Script tast for SQL2008


i converting sql 2005 server 2008.  have old active x script need convert script task ssis...

i not familar vb/c# scripting not know how convert use in 2008.

when run receive error " an error occurred while adding managed ssis type library script host. verify dts 2000 runtime installed".  believe want avoid invoking legacy functionality converting scripts @ point better.

'********************************************************************** '  visual basic activex script '**********************************************************************  function main() 	dim strto 	dim strcc 	dim strsubject 	dim strbody  	'construct subject , body , set attachment path 	strsubject = "validation #" + cstr(dtsglobalvariables("val_id").value) + " (" + cstr(dtsglobalvariables("errorcount").value) + "): " + dtsglobalvariables("val_name") 	strbody = "description:<br />" + vbcrlf + replace(dtsglobalvariables("val_dscr").value, "''", "'") + vbcrlf + vbcrlf + "<br /><br />suggestions:<br />" + vbcrlf + replace(dtsglobalvariables("val_web_notes").value, "''", "'") 	strattachmentpath = dtsglobalvariables("fileattachmentpath").value  	'construct address lists depending on if there errors 	if dtsglobalvariables("errorcount").value = 0 		strto = dtsglobalvariables("emailaddynoerrorsto").value 		strcc = dtsglobalvariables("emailaddynoerrorscc").value 	else 		strto = dtsglobalvariables("emailaddyerrorsto").value 		strcc = dtsglobalvariables("emailaddyerrorscc").value 	end if  	'if there's send email to, so. 	if len(strto) > 0 		call sendsmtpemail(strto, strcc, strsubject, strbody, strattachmentpath) 	end if  	main = dtstaskexecresult_success end function   '*********************************************************************************************************************************************************** 'this function sends email '*********************************************************************************************************************************************************** function sendsmtpemail(toaddresses, ccaddresses, subjecttext, bodytext, attachmentpath)   	dim imsg 	dim iconf 	dim flds 	 	const cdosendusingport = 2 	 	set imsg = createobject("cdo.message") 	set iconf = createobject("cdo.configuration") 	set flds = iconf.fields 	 	with flds 		.item("http://schemas.microsoft.com/cdo/configuration/sendusing") = cdosendusingport 		.item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.mail.com" 		.item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 10 		.update 	end 	 	with imsg 		set .configuration = iconf 		.to = toaddresses 		.cc = ccaddresses 		.from = "opsvalidator@somewhere.com" 		.subject = subjecttext '		.textbody = bodytext 		.htmlbody = bodytext 		.addattachment (attachmentpath) 		.send 	end 	 	set imsg = nothing 	set iconf = nothing 	set flds = nothing  end function

kdw


it looks not need scripts in ssis 2008.

you can use of of box send email task , define logic within tasks expressions.



SQL Server  >  SQL Server Integration Services



Comments

Post a Comment

Popular posts from this blog

Conditional formatting a graph vertical axis in SSRS 2012 charts

Image
hi, i have situation want color label on vertical axis of graph depending on condition. when values positive color black , when negative color red. i tried following condition but not working.   =iif(fields!myfield.value < 0 , "red", "black") i know there few threads mentioning feature not supported in ssrs 2008 wanted know if adddressed in ssrs 2012 or later? thanks , regards, oliver d'mello hi oliver, according description, want use expression specify different color axis labels based on values in chart. as tested in our environment, when apply condition in expression give dynamic color axis labels, color setting applies labels based on condition. issue happens in both sql server 2012 , 2014. please refer screenshots below: in scenario, recommend submit issue microsoft connect @ link https://connect.microsoft.com/sqlserver/feedback . connect site serve connecting point between , microsoft, , large community , microsoft intera
Read more

Register with Power BI failed

hi all, i've running local report server , want configure power bi integration. sign in azure active directory , registering power bi clientapp validated, fails following error: microsoft.reportingservices.wmiprovider.wmiproviderexception: unknown error has occurred in wmi provider. error code 80131500  ---> system.exception: exception of type 'system.exception' thrown.    --- end of inner exception stack trace ---    at microsoft.reportingservices.wmiprovider.rswmiadmin.throwonerror(managementbaseobject mo)    at microsoft.reportingservices.wmiprovider.rswmiadmin.savepowerbiinformation(string clientid, string clientsecret, string appobjectid, string tenantname, string tenantid, string resourceurl, string authurl, string tokenurl, string redirecturls)    at reportservicesconfigui.wmiprovider.rsreportserveradmin.savepowerbiinformation(powerbiappconfiguration appconfig) i tried sql server agent solution  ( https://social.msdn.microsoft.com/forums/en-us/58
Read more

SQL server replication error Cannot find the dbo or user defined function........

hi there, i ran problem while deploying sql 2008 transactional replication between 2 servers lets assume server , b. actually created  both distributor , publisher on server , after created subscriber pointed server b, launch replication monitor , found big red cross. when click on tab "distributor subscriber history" error says "cannot find either column "dbo" or user defined-function or aggregate "dbo.ufnleadingzeros", or name ambiguous". can body regarding issue. regards, ishuv hi, you need compare data , others reseved, index size, unused should not compared. differs. here server - data - 87896 kb server b - data - 78152 kb server data size includes publication tables, can't compare directly. need check article article know exact data size. SQL Server  > 
Read more