此异常System.Runtime.InteropServices.COMException(0x800706BA):RPC服务器不可用。 (异常来自HRESULT:0x800706BA)
System.Runtime.InteropServices.COMException (0x800706BA):
The RPC server is unavailable. (Exception from HRESULT: 0x800706BA)
在我的Windows服务在收到时我在任何机器上运行它,但是当我在测试应用程序测试它不会抛出异常。在我的代码中,我正在将两个.DAT文件转换为.xls文件。当我通过services.msc启动服务并运行该服务时,它运行良好一段时间,但在更新某些行之后,它会抛出异常,然后再没有任何事情发生。我有两个单独的功能来完成这项工作。示例代码是:
public void SaveData_component(string filename)
{
try
{
string filepath = System.Configuration.ConfigurationSettings.AppSettings["filepath"].ToString() + filename;
filepath_first = filepath;
object missing = Missing.Value;
//string getExtension = Path.GetExtension(filepath);
string getFilename = Path.GetFileNameWithoutExtension(filepath) + "New";
string filepathNew = System.Configuration.ConfigurationSettings.AppSettings["filepath"].ToString() + getFilename + ".xls";
try
{
xlAppNew1 = new Application();
xlAppNew1.DisplayAlerts = true;
workbooks1 = xlAppNew1.Workbooks;
workbook1 = workbooks1.Open(@filepath, 0, true, 1, "", "", true, Microsoft.Office.Interop.Excel.XlPlatform.xlWindows, "\t", false, false, 0, true, 1, 0);
// xlWorkSheet1 = (Microsoft.Office.Interop.Excel.Worksheet)workbook1.Worksheets.get_Item(1);
xlAppNew1.ActiveWorkbook.SaveAs(@filepathNew, -4143, "", "", false, false, Microsoft.Office.Interop.Excel.XlSaveAsAccessMode.xlNoChange,
missing, missing, missing, missing, missing);
string getExtension = ".xls";//Path.GetExtension(filepathnew);
//string getFilename = Path.GetFileNameWithoutExtension(filepathnew);
string connString = "";
if (getExtension.ToLower() == ".xls")
connString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + filepathNew + ";Extended Properties=\"Excel 8.0;HDR=YES;IMEX=1;\"";
else
connString = @"Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" + filepathNew + ";Extended Properties=Excel 12.0 Xml;HDR=Yes;IMEX=1;";
OleDbConnection con = new OleDbConnection(connString);
con.Open();
System.Data.DataTable dtSheet = con.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, null);
string tname = dtSheet.Rows[0]["TABLE_NAME"].ToString();
OleDbDataAdapter ad = new OleDbDataAdapter(@"Select * FROM [" + tname + "];", con);
DataSet dset = new DataSet();
ad.Fill(dset, "ProductOrderBOM");
System.Data.DataTable dt = new System.Data.DataTable();
System.Data.DataTable dttocopy = new System.Data.DataTable();
dt = dset.Tables["ProductOrderBOM"];
if (dt != null || dt.Rows.Count > 0)
{
dttocopy.Columns.Add("Column1", typeof(string));
dttocopy.Columns.Add("Column2", typeof(string));
dttocopy.Columns.Add("Column3", typeof(string));
dttocopy.Columns.Add("Column4", typeof(string));
dttocopy.Columns.Add("Column5", typeof(string));
dttocopy.Columns.Add("Column6", typeof(string));
dttocopy.Columns.Add("Column7", typeof(string));
dttocopy.Columns.Add("Column8", typeof(string));
dttocopy.Columns.Add("Column9", typeof(string));
for (int iRow = 0; iRow < dt.Rows.Count; iRow++)
{
dttocopy.Rows.Add(dt.Rows[iRow][0].ToString().Substring(3, 9), dt.Rows[iRow][0].ToString().Substring(12, 4), dt.Rows[iRow][0].ToString().Substring(16, 18), dt.Rows[iRow][0].ToString().Substring(34, 8), dt.Rows[iRow][0].ToString().Substring(42, 4), dt.Rows[iRow][0].ToString().Substring(46, 18), dt.Rows[iRow][0].ToString().Substring(64, 40), dt.Rows[iRow][0].ToString().Substring(104, 3), dt.Rows[iRow][0].ToString().Substring(107, 5));
}
foreach (DataRow item in dttocopy.Rows)
{
if (item.ItemArray[0].ToString() != "" && item.ItemArray[5].ToString() != "" && item.ItemArray[8].ToString() != "")
{
string prdorderno = item.ItemArray[0].ToString().Trim();
string materialcode = item.ItemArray[5].ToString().Trim();
double qty = Convert.ToDouble(item.ItemArray[8].ToString().Trim());
d1 = callprocedure(prdorderno, materialcode, Math.Round(qty, 2));
if (d1 != null)
{
if (d1.Tables[0].Rows[0]["Column1"] != null)
{
WriteStuff(d1.Tables[0].Rows[0]["Column1"].ToString());
}
}
}
}
}
d1.Clear();
d1.Dispose();
dset.Clear();
dset.Dispose();
dtSheet.Clear();
dtSheet.Dispose();
dt.Clear();
dt.Dispose();
dttocopy.Clear();
dttocopy.Dispose();
ad.Dispose();
con.Close();
con.Dispose();
}
catch (Exception Ex)
{
WriteStuff(Convert.ToString(Ex) + "save_datacomponent function before finally");
}
finally
{
GC.Collect();
GC.WaitForPendingFinalizers();
if (workbooks1 != null) System.Runtime.InteropServices.Marshal.ReleaseComObject(workbooks1);
if (workbook1 != null)
{
workbook1.Close(Type.Missing, Type.Missing, Type.Missing);
System.Runtime.InteropServices.Marshal.ReleaseComObject(workbook1);
}
if (xlAppNew1 != null)
{
xlAppNew1.Quit();
System.Runtime.InteropServices.Marshal.ReleaseComObject(xlAppNew1);
}
}
这是工作完成的功能。任何帮助都将非常可观。 我Writestuff()方法是抓住以下异常:
System.Runtime.InteropServices.COMException (0x800706BA): The RPC server is unavailable. (Exception from HRESULT: 0x800706BA) at Microsoft.Office.Interop.Excel.WorkbookClass.Close(Object SaveChanges, Object Filename, Object RouteWorkbook)at MyNewService.MyNewService.SaveData_component(String filename)savedata_component functionSystem.IO.FileNotFoundException: Could not find file 'C:\SUMIT\COMPONENT_TAI_PT1_RMKH_3799_20130603_030504New_03-06-2013-18-07-09-537_04-06-2013-16-42-20-194.DAT'.
另外,如果我摆脱我的代码中明确方法和
System.Runtime.InteropServices.Marshal.FinalReleaseComObject();
另一个例外来到我的方式:
System.Runtime.InteropServices.InvalidComObjectException: COM object that has been separated from its underlying RCW cannot be used.at Microsoft.Office.Interop.Excel.WorkbookClass.Close(Object SaveChanges, Object Filename, Object RouteWorkbook)at MyNewService.MyNewService.SaveData_component(String filename)
我真的不知道到底发生了什么。
开始'dttocopy.Rows.Add(...'的行被怀疑,因为它假定它找到的字符串的长度总是> = 4(它在SubString()中使用3个索引)。如果这不是真的,那么你会得到一个异常:在进行SubString()操作之前,你应该首先测试'dt.Rows [iRow] [0]'字符串长度 – DonBoitnott
你是否捕获异常?你的'WriteStuff() '方法获取有用的信息? – DonBoitnott
叹息,这些问题永远不会结束。很容易诊断问题,你需要的只是任务管理器。你会看到几十个Excel.exe实例,你的代码实际上并没有设法释放。摆脱你的全局“xl”变量并使它们成为局部变量。摆脱所有这些无效的Clear()和ReleaseComObject()调用。测试你的代码以确保在GC.Collect + WaitForPendingFinalizers调用之后Excel.exe停止运行秒。 *不*测试您的调试版本,只有发布版本没有附加调试器。 –