Bulk Upload on Button Click
Server Script on Applet to upload excel sheet:-
function WebApplet_PreInvokeMethod (MethodName)
{
if (MethodName == "UploadFile")
{
var i =2;
var ExcelApp =
COMCreateObject("Excel.Application");
ExcelApp.Workbooks.Open("D:\\UploadFile.xlsx");
ExcelApp.Visible = false;
var oBOLdVal = TheApplication().GetBusObject("Service
Request");
var oBCLdVal = oBOLdVal.GetBusComp("Service
Request");
while(ExcelApp.ActiveSheet.Cells(i,1).Value!= 'undefined')
{
var Type = ExcelApp.ActiveSheet.Cells(i,1).Value;
var SubType = ExcelApp.ActiveSheet.Cells(i,2).Value;
var Description = ExcelApp.ActiveSheet.Cells(i,3).Value;
var Status = ExcelApp.ActiveSheet.Cells(i,4).Value;
//var Product = ExcelApp.ActiveSheet.Cells(i,5).Value; //You
can define more cell here
with(oBCLdVal)
{
ActivateField("Service Request Type");
ActivateField("Lot Number");
ActivateField("Description");
ActivateField("Status");
ClearToQuery();
//ExecuteQuery();
InvokeMethod("SetAdminMode","TRUE");
NewRecord(NewAfter);
SetFieldValue("Service Request Type",Type);
SetFieldValue("Lot Number",SubType);
SetFieldValue("Description",Description);
SetFieldValue("Status",Status);
WriteRecord();
}
i=i+1;
}
ExcelApp.Quit();
ExcelApp = null;
oBOLdVal = null;
oBCLdVal = null;
TheApplication().RaiseErrorText("Load Success");
return(CancelOperation);
}
return(ContinueOperation);
}