Question

Visual Studio 2017社区，VB.NET，Windows7

这就是我得到的：

System.Runtime.InteropServices.COMException: '[FireDAC][DatS]-32. Variable length column [Version] overflow. Value length - [71], column maximum length - [10]'

详情：

System.Runtime.InteropServices.COMException occurred
  HResult=0x80020009
  Message=[FireDAC][DatS]-32. Variable length column [Version] overflow. Value length - [71], column maximum length - [10]
  Source=AllSkyPlateSolver.PlateSolver
  StackTrace:
at AllSkyPlateSolver.IPlateSolver.PlateSolve(String FileName, Int32 FocalLength, Double PixelSize, Double CurrentRA, Double CurrentDec, Double NearRadius)
at WindowsApp1.ASCOM_Test3.Solve(String sPAR) in C:\Programming\VB\PatsAstroUtility\WindowsApp1\ASCOM_Test3.vb:line 233
at WindowsApp1.ASCOM_Test3.btnSolve_Click(Object sender, EventArgs e) in C:\Programming\VB\PatsAstroUtility\WindowsApp1\ASCOM_Test3.vb:line 208
at System.Windows.Forms.Control.OnClick(EventArgs e)
at System.Windows.Forms.Button.OnClick(EventArgs e)
at System.Windows.Forms.Button.OnMouseUp(MouseEventArgs mevent)
at System.Windows.Forms.Control.WmMouseUp(Message& m, MouseButtons button, Int32 clicks)
at System.Windows.Forms.Control.WndProc(Message& m)
at System.Windows.Forms.ButtonBase.WndProc(Message& m)
at System.Windows.Forms.Button.WndProc(Message& m)
at System.Windows.Forms.Control.ControlNativeWindow.OnMessage(Message& m)
at System.Windows.Forms.Control.ControlNativeWindow.WndProc(Message& m)
at System.Windows.Forms.NativeWindow.DebuggableCallback(IntPtr hWnd, Int32 msg, IntPtr wparam, IntPtr lparam)
at System.Windows.Forms.UnsafeNativeMethods.DispatchMessageW(MSG& msg)
at System.Windows.Forms.Application.ComponentManager.System.Windows.Forms.UnsafeNativeMethods.IMsoComponentManager.FPushMessageLoop(IntPtr dwComponentID, Int32 reason, Int32 pvLoopData)
at System.Windows.Forms.Application.ThreadContext.RunMessageLoopInner(Int32 reason, ApplicationContext context)
at System.Windows.Forms.Application.ThreadContext.RunMessageLoop(Int32 reason, ApplicationContext context)
at Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.OnRun()
at Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.DoApplicationModel()
at Microsoft.VisualBasic.ApplicationServices.WindowsFormsApplicationBase.Run(String[] commandLine)
at WindowsApp1.My.MyApplication.Main(String[] Args) in :line 81

奇怪的事情：我完全重新安装了AllSkyPlateSolver。在那之后，我只能一次调用它，它确实做了预期的事情（板块解决图像）。之后的任何时候，我都会收到此错误。甚至更奇怪：我在Visual Basic中收到错误后，我无法再从我的桌面启动原始的AllSkyPlateSolver而不会出现同样的错误。任何意见，将不胜感激。

相关代码：

Private myASPS As AllSkyPlateSolver.PlateSolver
Private FocalLength As Integer = 570
Private PixelSize As Double = 5.4
Private CurrentRA As Double = tRA
Private CurrentDec As Double = tDE
Private NearRadius As Double = 15

Private Sub Solve()
    ImageFile = OpenFileDialog1.FileName
    myASPS = New AllSkyPlateSolver.PlateSolver()
    myASPS.PlateSolve(ImageFile, FocalLength, PixelSize, CurrentRA, CurrentDec, NearRadius)
End Sub

奇怪的System.Runtime.InteropServices.COMException

0 个答案: