vb.net - Copy information from a Excel file to another Excel file using SSIS VB2010, What wrong with these code -

-

i making ssis will:

  1. copy data sql server sql excel file
  2. then excel file preexisting excel file formulas

i did first part --copy sql excel1-- works fine. tried copy excel1 file other using script task in visual basic 2010.

i want check program , tell me wrong in trying copy information excel1 excel2. when executed error dts scrip task runtime error , nothing.

public sub main()     dim oexcel microsoft.office.interop.excel.application,         oexel2 microsoft.office.interop.excel.application      dim obook microsoft.office.interop.excel.workbook,         obook2 microsoft.office.interop.excel.workbook,         osheet microsoft.office.interop.excel.worksheet,         osheet2 microsoft.office.interop.excel.worksheet      'programing      'from  excel spreadsheet      oexcel = new microsoft.office.interop.excel.application()     oexcel.visible = false     obook = new microsoft.office.interop.excel.workbook("c:\documents\at1.xls")     osheet = directcast(obook.sheets("sheet1"), microsoft.office.interop.excel.worksheet)       'to excel spreadsheet      oexel2 = new microsoft.office.interop.excel.application()     oexel2.visible = false     obook2 = new microsoft.office.interop.excel.workbook("c:\documents\a2.xls")     osheet2 = directcast(obook2.sheets("january"), microsoft.office.interop.excel.worksheet)      osheet2.range("b11", "r16").value = osheet.range("a3", "q8").value      'close       osheet = nothing     obook.close(false)     oexcel.quit()      osheet2 = nothing     obook.close(false)     oexel2.quit()      dts.taskresult = scriptresults.success   end sub

you should not use excel interop in ssis implies must install excel on server , not recommended. trick...

public sub main()      dim oexcel microsoft.office.interop.excel.application      dim obook microsoft.office.interop.excel.workbook, _         obook2 microsoft.office.interop.excel.workbook, _         osheet microsoft.office.interop.excel.worksheet, _         osheet2 microsoft.office.interop.excel.worksheet      oexcel = new microsoft.office.interop.excel.application()     oexcel.sheetsinnewworkbook = 1     oexcel.displayalerts = false     oexcel.visible = false      obook = oexcel.workbooks.open("c:\documents\at1.xls")     osheet = obook.sheets("sheet1")      obook2 = oexcel.workbooks.add()     osheet2 = obook2.worksheets.item(1)     osheet2.name = "january"      osheet2.range("b11", "r16").value = osheet.range("a3", "q8").value      obook2.saveas("c:\documents\a2.xls", microsoft.office.interop.excel.xlfileformat.xlworkbooknormal)      obook.close()     obook2.close()     oexcel.quit()  end sub

it not choice, i'd use oledb instead.

to overwrite existing workbook then...

public sub main(byval arguments() string)      dim oexcel microsoft.office.interop.excel.application      dim obook microsoft.office.interop.excel.workbook, _         obook2 microsoft.office.interop.excel.workbook, _         osheet microsoft.office.interop.excel.worksheet, _         osheet2 microsoft.office.interop.excel.worksheet      oexcel = new microsoft.office.interop.excel.application()     oexcel.sheetsinnewworkbook = 1     oexcel.displayalerts = false     oexcel.visible = false      obook = oexcel.workbooks.open("c:\documents\at1.xls")     osheet = obook.sheets("sheet1")      obook2 = oexcel.workbooks.open("c:\documents\a2.xls")     osheet2 = obook2.sheets("january")      osheet2.range("b11", "r16").value = osheet.range("a3", "q8").value      obook2.save()      obook.close()     obook2.close()      oexcel.quit()  end sub

Comments

Post a Comment

Popular posts from this blog

c++ - OpenCV Error: Assertion failed <scn == 3 ::scn == 4> in unknown function, -

-
i read alot other solution still confused should mine... #include <opencv2/objdetect/objdetect.hpp> #include <opencv2/highgui/highgui.hpp> #include <opencv2/imgproc/imgproc.hpp> #include <iostream> #include <stdio.h> using namespace std; using namespace cv; int main(int argc, const char** argv) { //create cascade classifier object used face detection cascadeclassifier face_cascade; //use haarcascade_frontalface_alt.xml library face_cascade.load("haarcascade_frontalface_alt.xml"); //setup video capture device , link first capture device videocapture capturedevice; capturedevice.open(0); //setup image files used in capture process mat captureframe; mat grayscaleframe; //create window present results namedwindow("outputcapture", 1); //create loop capture , find faces while (true) { //capture new image frame capturedevice >> captureframe; ...
Read more

php - render data via PDO::FETCH_FUNC vs loop -

-
i've been using 2 methods render data. the first one: function name($id,$name){ return '<div id="'.$id.'">'.$name.'</div>'; } echo implode($pdo->query("select id,name user")->fetchall(pdo::fetch_func,'name')); the second one: $users = $pdo->query("select id,name user")->fetchall(pdo::fetch_obj); foreach($users $user){ echo name($user->id,$user->name); } i don't understand how pdo::fetch_func works. tried figure out. however, not well-documented. could please explain fetch mode? , also, 1 performs better? thank you. both methods wrong , have learn how use templates , how separate business logic presentation logic. $users = $pdo->query("select id,name user")->fetchall(pdo::fetch_obj); tpl::assign('users', $users); is code business logic part. then in template <?php foreach $users $row): ?> <div id="<?=$...
Read more

The canvas has been tainted by cross-origin data in chrome only -

-
uncaught securityerror: failed execute 'getimagedata' on 'canvasrenderingcontext2d': canvas has been tainted cross-origin data i getting above error in chrome. code(following) works fine in mozilla. have not corss domain issue. why above error in chrome? var wheel_canvas, wheel_context, can_w, can_h, wheel_grd; var large_radius = 160; var small_radius = 120; var wheel_canvas = document.getelementbyid('wheel_canvas'); var wheel_context = wheel_canvas.getcontext('2d'); var can_w = $(wheel_canvas).width(); var can_h = $(wheel_canvas).height(); var centerx = can_w / 2, centery = can_h / 2; var wheel_grd = null; test('#ff0000'); function test(hex) { $('#clrpicker').css({'left': 210, 'top': 210 }); inverted = hexbw(hex); $('#color_val_show').val(hex); current_color_hex_val_selected = hex; $('#color_val_show').css({'color':inverted,'background':hex}); fillgradient...
Read more