Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Macro za ubacivanje tabela iz Oracle baze u Access!

[es] :: Access :: Macro za ubacivanje tabela iz Oracle baze u Access!

[ Pregleda: 1756 | Odgovora: 2 ]

 Postavi temu Odgovori

Autor
Pretraga teme: Traži
Markiranje Štampanje RSS

Filantrop

Član broj: 34461
Poruke: 8
194.126.213.*



Profil

icon Macro za ubacivanje tabela iz Oracle baze u Access!16.01.2006. u 09:31

Trebam u Access 2000 ubaciti tablice iz Oracle baze:

Postepen (ručni) postupak je :

- Tables ---New, izaberemo Import Table

- U dijalogu Import odaberemo tip tablice ODBC Dataabases()

- U dijalogu Machine Data Source izaberemo npr. skladiste sa type (System),

- U dijalogu Microsoft ODBC for Oracle Connect ispunimo:

User name: skladiste
Pasword: skladiste
Server: Beq-Local

- U dijalogu Tables izaberemo tablice npr. SKLADISTE.ARTIKLI i SKLADISTE.PROMET

- Nakon tog postupka Access formira tablice SKLADISTE_ARTIKLI i SKLADISTE_ PROMET.

Eto taj postupak bih trebao automatizirati kroz neki macro.

Ima li ko kakav cod za macro?

Pozdrav!
16.01.2006. u 09:31 

Trtko
Koprivnica

Član broj: 69494
Poruke: 501
195.29.146.*



Profil

icon Re: Macro za ubacivanje tabela iz Oracle baze u Access!16.01.2006. u 13:04
Pozdrav ,
eto , ne pita te nist , napravi import


server = "BK02" ' napomena , skreiras si ODBC (moj se zove BK02 kao i server)
lozinka = "skladiste"
pasword = "skladiste"

oddb = "ODBC;DSN=" + server + "; Uid=" + lozinka + "; Pwd=" + pasword + ";DATABASE=" + server


DoCmd.TransferDatabase acImport, "ODBC Database", oddb, acTable, loz + ".artikli", loz + "_artikli"

' ubacio si tablicu u datasheet view ......

preg.SourceObject = "table." + loz + "_artikli"
tabime.Caption = loz + "_FKPR"

itd .......
i nije u makrou

vec u kodu , na form open




[Ovu poruku je menjao Trtko dana 16.01.2006. u 14:07 GMT+1]
16.01.2006. u 13:04 

Filantrop

Član broj: 34461
Poruke: 8
194.126.213.*



Profil

icon Re: Macro za ubacivanje tabela iz Oracle baze u Access!17.01.2006. u 10:50

Hvala na pomoći, malo sam preinačio i radi kako treba. Evo dajem moj cod koji radi u formi na jedan klik gumba.


---------------
Private Sub OBNOVA_BAZE_Click()

DoCmd.DeleteObject acTable, "SKLADISTE_PROMET"


server = "SKLADISTE"
lozinka = "skladiste"
pasword = "skladiste"
sk = "Beq-Local"

oddb = "ODBC;DSN=" + server + "; Uid=" + lozinka + "; Pwd=" + pasword + ";SERVER=" + sk


DoCmd.TransferDatabase acImport, "ODBC Database", oddb, acTable, server + ".PROMET", server + "_PROMET"



If MsgBox("Unos je uspješno završio!", _
vbOKOnly, "Poruka nakon unosa") = _
vbOK Then
DoCmd.Close
End If


End Sub

----------------------------
17.01.2006. u 10:50 

[es] :: Access :: Macro za ubacivanje tabela iz Oracle baze u Access!

[ Pregleda: 1756 | Odgovora: 2 ]

 Postavi temu Odgovori

Srodne teme
Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.