Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Skopírujte a vložte nasledujúci kód vytvoriť nový čiastkové postup a vytvoriť premenné , ktoré budete používať na pripojenie do programu Excel :
Private Sub displayExcelInDataGrid ( ) Dim rs ako ADODB.RecordsetSet rs = New ADODB.RecordsetDim sConn ako StringDim sFile As String
2
Definujte cestu k hárku programu Excel a definovať vlastnosti sady záznamov :
sFile = " C : \\ Temp \\ myXLFile.xls " rs.CursorLocation = adUseClientrs.CursorType = adOpenKeysetrs.LockType = adLockBatchOptimistic
3
skopírujte a vložte nasledujúci kód dotaz " Hárok1 " z programu Excel a zobrazí ju pomocou ovládací prvok DataGrid pomocou záznamov :
sConn = " DRIVER = Microsoft Excel Driver ( . * XLS ) ; " & " DBQ = " & sFilers.Open " SELECT * FROM [ ,"Hárok1 $ ] " , sconnSet DataGrid1.DataSource = rsEnd Sub
Copyright © počítačové znalosti Všetky práva vyhradené