Şu anda çevrimdışısınız; İnternet'in yeniden bağlanması bekleniyor

SORUN: Sequence hata açılıyor ADODB Recordset'i ilk kez bir Excel XLS karşı Collating...

ÖNEMLİ: Bu makale, bir kişi tarafından çevrilmek yerine, Microsoft makine-çevirisi yazılımı ile çevrilmiştir. Microsoft size hem kişiler tarafından çevrilmiş, hem de makine-çevrisi ile çevrilmiş makaleler sunar. Böylelikle, bilgi bankamızdaki tüm makalelere, kendi dilinizde ulaşmış olursunuz. Bununla birlikte, makine tarafından çevrilmiş makaleler mükemmel değildir. Bir yabancının sizin dilinizde konuşurken yapabileceği hatalar gibi, makale; kelime dağarcığı, söz dizim kuralları veya dil bilgisi açısından yanlışlar içerebilir. Microsoft, içeriğin yanlış çevrimi veya onun müşteri tarafından kullanımından doğan; kusur, hata veya zarardan sorumlu değildir. Microsoft ayrıca makine çevirisi yazılımını sıkça güncellemektedir.

Makalenin İngilizcesi aşağıdaki gibidir:246167
Belirtiler
Excel'in/ODBC/ıSAM sürücüsü bir Microsoft Excel elektronik tablolarından Visual Basic, Visual Studio 6.0 Service Pack 3 (veya üstü) tümleşik geliştirme ortamı (IDE) içinde açılıyor, aşağıdaki çalışma zamanı hatası üretir:
Zamanı hatası '(80004005)-2147467259' çalıştırın: [Microsoft] [ODBC Excel sürücüsü] seçili harmanlama sırasını işletim sistemi tarafından desteklenmiyor.
Bu sorun, Visual Basic IDE içinde kod çalışan her zaman oluşur.

Not Tüm alanları SQL deyimini, örneğin seçilmişse, bu hata oluşmaz:
SELECT * FROM ...				
derlenmiş bir EXE içinde Ayrıca, bu sorun oluşmaz.
Neden
Bu hizmet paketi 3'ile başlayan Visual Basic ıDE'NIN içinden bir sorundur.
Daha fazla bilgi

Davranışı yeniden oluşturma adımları

  1. Microsoft Excel 97 veya Microsoft Excel 2000 elektronik tablo oluşturun ve aşağıdaki değerleri prescribe alanları yerleştirin:
    • A1 F1 =
    • B1 F2 =
    • C1 F3 =

  2. Elektronik tabloyu kaydedin ve işaret bir DSN oluşturma.
  3. Visual Basic 6. 0'a Visual Studio 6.0 Service Pack 3 veya sonraki sürümü) başlatın.
  4. Yeni bir standart exe DOSYASı oluşturun ve Microsoft Active Data Objects için bir başvuru oluşturun. Aşağıdaki kodu formun yapıştırın:
    Public Sub Form_Load()    Dim constring As String    Dim Connection As New ADODB.Connection    Dim cmd As New ADODB.Command    Dim rs As New ADODB.Recordset'   define a DSN IMPORT-XLS, using the Excel ODBC driver, and point it to the xls file     constring = "Provider=MSDASQL;DSN=IMPORT-XLS"          Connection.Open constring     Set cmd.ActiveConnection = Connection     cmd.CommandType = adCmdText     '   The following .CommandText causes the error, but only the first time it is run within the ide.   cmd.CommandText = "Select F1, F2 from ""Sheet1$"""'   The following .CommandText will not cause the error.'    cmd.CommandText = "Select * from ""Sheet1$"""     rs.CursorLocation = adUseClient     rs.CursorType = adOpenStatic     rs.LockType = adLockReadOnly     rs.Open cmd     While Not rs.EOF        MsgBox rs.Fields(0)        rs.MoveNext     WendEnd Sub					
  5. Gerekli değişiklikleri için ConnectionString yapın.
  6. Formu çalıştırın.
  7. Formu ilk çalıştırdığında, hata görünür; izleyen metinler görünmez.
<a1>hata</a1>-2147467259 (80004005)

Uyarı: Bu makalenin çevirisi otomatik olarak yapılmıştır

Özellikler

Makale No: 246167 - Son İnceleme: 06/24/2004 19:59:14 - Düzeltme: 3.1

Microsoft Visual Basic 6.0 Learning Edition, Microsoft Visual Basic 6.0 Professional Edition, Microsoft Visual Basic Enterprise Edition for Windows 6.0, Microsoft Visual Basic 6.0 Enterprise Edition Service Pack 3, Microsoft Visual Basic 6.0 Enterprise Edition Service Pack 4, Microsoft Visual Basic 6.0 Enterprise Edition Service Pack 5, Microsoft ActiveX Data Objects 2.1 Service Pack 2, Microsoft ActiveX Data Objects 2.5, Microsoft ActiveX Data Objects 2.6, Microsoft ActiveX Data Objects 2.7

  • kbmt kbdatabase kbiisam kbprb KB246167 KbMttr
Geri bildirim