12. marts 2004 - 10:58Der er
12 kommentarer og 1 løsning
overfør data fra as400 til PC ell. IP ell. FTP
Jeg har en Query der kører på vores AS400 på et fast tidspunkt hver dag - 7 dage om ugen 52 uger om året - sent på dagen.
Idag rækker min kompetenece til at overføre data direkte fra Client Access til min PC ved en simpel drag 'n drop eller ved hjælp af database forespørgsel i Excel.
Det jeg så gerne vil lære nu er hvordan jeg, helst via VBScript eller VBA, kan connecte til AS400, læse de 280.000 records i min databasefil og gemme dem i en flad .txtfil på et netværksdrev.
Jeg har naturligvis Client Access ODBC Driveren installeret og har rodet lidt med ADO.
Hvis man kunne benytte en kommando i stil med CPYSPLF direkte på AS400 til ovenstående er jeg helt sikkert interesseret i denne løsning også.
Alle de steder jeg har kigget på nettet er der tale om ældgamle indlæg (vi snakker Win 3.x og 95)... Det må da for h.... være muligt.
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
ftp AS400IP/DSN <ENTER> Brugerid <ENTER> Password <ENTER> (? <ENTER> for en oversigt over kommandoer) get AS400bibliotek/filnavn C:\test.txt
(Filen skulle gerne modtages)
bye <ENTER> (For at slutte af) ... Denne løsning er bare mere klodset end at bruge Client Access og kræver stadig at man indtaster brugerid og adgangskode manuelt osv. osv. Jeg kunne naturligvis lave et vbScript, men dette vil gøre adgangskoden så godt som Public Domain.
Jeg har læst 14.000 artikler om hvor nemt det er at Ftp'e direkte fra AS400 men jeg har ikke kunnet finde nogle How to's om emnet.
Manglen på respons her melder også om, at jeg muligvis gaber over mere end jeg kan magte :o)
jeg har lavet en fil (ftpscript.bat) med følgende linie:
ftp -n -s:ftpscript.txt>ftpout.txt
ftpscript.txt er filen der indeholder alle kommandoer til AS400/FTP. ftpout.txt indeholder alle svar der er kommet tilbage fra AS400/FTP.
Filen ftpscript.txt ser således ud: open AS400DSN user brugerid password get as400bibliotek/dbasefil target.txt quit ... Mere brugbare forslag modtages fortsatmed kyshånd.
Jeg tror godt jeg kan gennemskue dine slå-fejl :o)
Jeg er ikke lige inde i .dtf filer. Har lige opgraderet til Client Access V5R2 istedet for som tidligere V5R1. Her er der en masse med .dtf og det kan godt være jeg skal sætte mig lidt mere ind i det.
Har du evt. et eksempel på hvordan man kalder en .dtf fil via VBA?
En doven, udslidt, AS400 amatør som mig, vil sætte pris på al den hjælp han kan få :o)
Jeg ville også som Kepsus siger bruge *.dft, men jeg kommer lige med en forklaring på hvordan..Du skrive du er på V5M2 nu også hedder alt jo iSeries istedet for AS400, så det kan være jeg blander lidt rundt på det :o)Åben din "dataoverførsel fra iSeries" vias start-programmer-IBM iSeries access til windows. Her skulle iSeries navn gerne automatisk stå i feltet systemnavn. I filnavn: skriver du "biblioteksnavn/filnavn" hvor du har gemt dit dataudtræk fra IBM AS400 query.Klik evt.bare på gennemse, men først når du har skrevet biblioteksnavn, eller kan du nok kun se Qtemp og måske nogle få andre, og der kan du så browse dig resten af vejen til datafilen (husk at klikke på vælg inden ok).ved klik på datavalg, har du mulighed for at lave noget Select, men det har du formenligt klar i din query. I PC feltet vælge du i outputenhed = FIL og klik på detaljer, husk her at rette til overskriv eksistende fil, eller får du problemer 2. gang den skal køre, eller vælger du den filtype du vil have.PC-beskrivelses fil lade du bare flueben væreslået til og ikke mere + klik OK. I filnavn skrive du stien til hvor du vil gemme eller browse dig frem, men husk at sætte efternavn på filen, F.eks XXX.TXT ved tekstfil, el. xxx*.xls ved Excelfiler, det kan den nemlig ikke selv finde ud af. Nu kan du teste ved at trykke på overfør.......den viser så hvor mange liner der overføres og gemmes i filen XXX.txt på f.eks det netværksdrev du har valgt. Gem overførselprofilen. Det var første fase. Nu skal du have lagt den ind i planlagte opgave på din/el. anden PC. Du skal vælge exe-fil der hedder cwbtf.exe som ligger C:\Programmer\IBM\Client Access\ til at afvikler det rigtige program. hvis du bruger guiden som er i XP, kan du bare klikke igennem indtil du kan trykke avanceret, som komme du til gammel velkendt billed af planlagte opgaver. Her udfylder du sådan "C:\Programmer\IBM\Client Access\cwbtf.exe" c:\mappe på pc\navn på overførselprofil.dft. Der er forskellige opsæt med flere gange, men det kender du nok til og du blive også promtet for password, men den kan huske det fremover, og det løse jo dit problem. Det er en lidt tung måde, men det virker for mig
Ups - Glemte lige at skrive at du tage en egenskaber på overførselprofil, hvor du i fanen "start" skal markere med flueben at den skal udføre automatisk og Luk automatiksk bagefter, ellers popper der bare det billede op, hvor du selv skal trykke overfør.... Men husk lige at lave en kopi, da du ikke bagefter kan arbejde/ændre noget i den overførselsprofil. Du kan med fordel også fjerne visning af at den er udført.
God Weekend :o)
Nu har jeg ferie en uge , juhuuuuu
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.