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

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

BIT Version

  hi,     knows how find out ther bit version in sql  , windows os (32 or 64)   regards, s.balavenkatesh   microsoft sql server 2005 - 9.00.1399.06 (intel x86) oct 14 2005 00:33:37 copyright (c) 1988-2005 microsoft corporation standard edition on windows nt 5.2 (build 3790: service pack 2)     intel x86)   -- says sql server 32 bit   madhu SQL Server  >  SQL Server Tools
Read more

Admin Permissions

hi need create new 'role' following permissions, 1. access sql server logs. 2. access maintenance plans ( can avoid access) 3. access activity monitor 4. normal access product databases , not system db´s need guidance on how it, can point me in right direction please? thanks 1.grant  execute on xp_readerrorlog [domainname\ad user or group]; 2. http://technet.microsoft.com/en-us/library/ms191002.aspx 3.view server state permission 4. make user member of dbo_owner database role. best regards,uri dimant sql server mvp, http://sqlblog.com/blogs/uri_dimant/ ms sql optimization: ms sql development , optimization ms sql consulting: large scale of database , data cleansing remote dba services: improves ms sql database performance sql server integration services: business intelligence SQL Server  >  ...
Read more