Dear Akang - akang sadaya
Dah setengah harian ini coba-coba buat access dengan link ke DBF file ( database nya masih jadul bgt dah), maunya untuk reporting dan analysa data pake access.
nemu masalah waktu linked table dari DBF ke access. karena table DBF nya berubah-ubah (nama filenya perperiode), jadi waktu buka access harus direfresh dulu ke File DBF yang baru.
browsing cari-cari cara refresh tablenya belum bisa juga. berkenankah akang-akang disini ng-advice yang lagi belajar ini :
nemu code berikut tetep gak bisa,
Public Sub UnLinkMe(strTable As String)
'this sub deletes a table def. For linked tables it deletes the link only!
CurrentDb.TableDefs.Delete strTable
End Sub
'this sub deletes a table def. For linked tables it deletes the link only!
CurrentDb.TableDefs.Delete strTable
End Sub
Public Sub LinkMeUp(strTable As String, strPath As String)
Dim tdf As dao.TableDef
Dim tdf As dao.TableDef
'create the new tabledef
Set tdf = CurrentDb.CreateTableDef(strTable)
Set tdf = CurrentDb.CreateTableDef(strTable)
'connect it to the back end .mdb file on disk
tdf.Connect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strPath & ";Extended Properties=dBASE IV;"
tdf.Connect = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strPath & ";Extended Properties=dBASE IV;"
'specify the table name in the back end .mdb
tdf.SourceTableName = strTable
'append the linked table locally
CurrentDb.TableDefs.Append tdf
End Sub
pas yang terakhir "CurrentDb.TableDefs.Append tdf" pasti error terus. Runtime error 3170 "could not find installed ISAM"
kira-kira apanya kang.
makasi sebelumnya.
wassalam
--
A.Jamal
--
A.Jamal
__._,_.___
SPAM IS PROHIBITED
MARKETPLACE
Stay on top of your group activity without leaving the page you're on - Get the Yahoo! Toolbar now.
.
__,_._,___
--
This message has been scanned for viruses and
dangerous content by MailScanner, and is
believed to be clean.
No comments:
Post a Comment