Sql Suery In Excell
acholyte vb <[email protected]>
| Newsgroups | gmane.comp.db.mysql.odbc |
|---|---|
| Message-ID | <[email protected]> |
Hai Everyone, Allow me to introduce myself,
My Name is Benny, I'am from Indonesia,
I have ben use mysqlodbc version 3.51 for my application,
Now I'am studying query sql in excell file, anyone can help me, i have code like this:
Note ; I Used vb 6 + Mysqlodbc 3.51 + Excell 2003 Prof
Dim cn As New ADODB.Connection
Dim com As New ADODB.Command
Dim rec As New ADODB.Recordset
Set cn = New ADODB.Connection
With cn
.Provider = "Microsoft.Jet.OLEDB.4.0"
.ConnectionString = "Data Source=C:\Tes Excell\Tes.xls;" & _
"Extended Properties=Excel 8.0;"
.Open
If rec.State = adStateOpen Then rec.Close
com.CommandText = "Select * from [sheet1$A1:C4]"
com.ActiveConnection = cn
rec.Open com, , adOpenDynamic, adLockOptimistic
rec.MoveFirst
Do While Not rec.EOF
MsgBox rec(0) + rec(1) + rec(2)
rec.MoveNext
Loop
End With
is there anyone can tell me, about query to find a record and manipulate it such as addnew, edit/update and delete but only current record, not all record in 1 sheet in excell file, anyone can help me, please i really need the solution,
because to find data in excell file, it's very hard because the record it not fix and range in my query will not able to fill my need, please help me, asap
thx 4 kindness, attention and solution
if you don't mind, you could send the sample directly to my email :
[email protected]
Best Regard's
Benny
---------------------------------
Bergabunglah dengan orang-orang yang berwawasan, di bidang Anda di Yahoo! Answers