[ad_1]
The server threw an exception. (Exception from HRESULT: 0x80010105 (RPC_E_SERVERFAULT))
जब मेरा प्रोजेक्ट चलता है तो यह त्रुटि आती है कृपया समस्या को हल करने में मेरी सहायता करें
मैंने क्या प्रयास किया है:
1 Private Function GetXlUsedRange(ByVal filePath As String) As Object(,) 2 Dim xlApp As Excel.Application 3 Dim xlWorkbooks As Excel.Workbooks 4 Dim xlWorkbook As Excel.Workbook 5 Dim xlSheets As Excel.Sheets 6 Dim xlWorkSheet As Excel.Worksheet 7 Dim xlRange As Excel.Range 8 9 10 xlApp = New Excel.Application 11 xlWorkbooks = xlApp.Workbooks 12 xlWorkbook = xlWorkbooks.Open(filePath) 13 xlSheets = xlWorkbook.Worksheets 14 xlWorkSheet = CType(xlSheets("Data"), Excel.Worksheet) 15 xlRange = xlWorkSheet.UsedRange 16 17 Dim rangeValues(,) As Object 18 rangeValues = CType(xlRange.Value, Object(,)) 19 20 21 xlWorkbook.Close() 22 xlWorkbooks.Close() 23 xlApp.Quit() 24 25 releaseObject(xlRange) 26 releaseObject(xlWorkSheet) 27 releaseObject(xlSheets) 28 releaseObject(xlWorkbook) 29 releaseObject(xlWorkbooks) 30 releaseObject(xlApp) 31 32 Return rangeValues 33 End Function 34 35 Private Sub releaseObject(ByVal obj As Object) 36 Try 37 System.Runtime.InteropServices.Marshal.ReleaseComObject(obj) 38 obj = Nothing 39 Catch ex As Exception 40 obj = Nothing 41 End Try 42 End Sub 43 44 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 45 Dim usedRange(,) As Object = GetXlUsedRange("C:\Users\Jayanta Modak\Desktop\import.xls") 46 47 Dim fromRow As Integer = 7 48 PopulateListView(usedRange, fromRow) 49 End Sub
समाधान 1
ईमानदारी से कहूँ तो, हम उस छोटी सी जानकारी में आपकी मदद नहीं कर सकते हैं, और संभवतः आपको “पूर्ण समाधान” बिल्कुल भी नहीं दे सकते हैं – केवल इसलिए क्योंकि जब आपका कोड चल रहा हो तो हमारे पास आपके सिस्टम पर आपकी स्प्रैडशीट तक पहुँचने का कोई तरीका नहीं है, और समस्या का निदान शुरू करने के लिए आपको इसकी आवश्यकता है।
तो, यह आप पर निर्भर करेगा।
सौभाग्य से, आपके पास एक उपकरण उपलब्ध है जो आपको यह पता लगाने में मदद करेगा कि क्या हो रहा है: डिबगर। यदि आप नहीं जानते कि इसका उपयोग कैसे करना है तो “विज़ुअल स्टूडियो डिबगर” के लिए एक त्वरित Google आपको आवश्यक जानकारी देगा।
फ़ंक्शन में पहली पंक्ति पर ब्रेकपॉइंट लगाएं, और डीबगर के माध्यम से अपना कोड चलाएं। फिर अपने कोड और अपने डेटा को देखें और पता लगाएं कि मैन्युअल रूप से क्या होना चाहिए। फिर एक चरण में प्रत्येक पंक्ति की जाँच करें कि आपने जो होने की उम्मीद की थी वही हुआ। जब ऐसा नहीं होता है, तब आपको कोई समस्या होती है, और आप इसका कारण जानने के लिए बैक-ट्रैक कर सकते हैं (या इसे फिर से चला सकते हैं और अधिक बारीकी से देख सकते हैं)।
जब आप जानते हैं कि कौन सी लाइन अपवाद का कारण बनती है, तो आप उस डेटा को देख सकते हैं जो आपने उसे दिया था, और यह क्या कर रहा है (आपको संभवतः अपने ऐप को फेलिंग लाइन पर ब्रेकपॉइंट सेट के साथ फिर से चलाने की आवश्यकता होगी)। डेटा से आपको समस्या का सुराग मिलना चाहिए.
क्षमा करें, लेकिन हम आपके लिए ऐसा नहीं कर सकते – यह आपके लिए एक नया (और बहुत, बहुत उपयोगी) कौशल सीखने का समय है: डिबगिंग!
[ad_2]
コメント