sql-kyselyn tulos excel-formaattiin accessin vb:llä

sql-kyselijä

Asiakkaiden koneilla käytetään access-sovelluksia. Data on accessin mdb-tiedostossa serverillä. Asiakkaiden sovellukset tekevät sql-kyselyitä datalle. Onko accessin basicillä mahdollista tehdä sellaista operaatiota, että talletetaan sql-kyselyn tulos työasemalle excel-formaattiin?
Siis automaattisesti ilman mitään käyttäjän käynnistämiä export-valikkoja. Helpeissä kyllä kerrottiin, kuinka valikoista voidaan tehdä exportteja, mutta en löytänyt koodista esimerkkejä.

5

1023

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • .....

      Luet esimerkiksi datan tauluista ja kirjoitat html-sivun jonka ainoana sisältönä on table-elementti jossa on taulun tavara. Excel osaa näyttää tuon tiedon oikein.

    • * * * * * * *

      Mikset rakenne exeliä käsittelemään access-kantaa?

      • sql-kyselijä

        No kun sovellus on käytössä noin 10 eri työasemalla ja näiden yhteisessä tietokannnassa on 20 taulua. Sovellus on muuten valmis ja jo käytössä, mutta muutama raportti pitäisi pystyä tulostamaan myös excel-muodossa (paperin lisäksi). En ala kirjoittamaan sovellusta uusiksi excelillä. En usko, että excel on hyvä tietokantasovellusten rakentamistyökalu. Voiko sillä edes tehdä client-server-sovelluksia?


      • * * * * * * *
        sql-kyselijä kirjoitti:

        No kun sovellus on käytössä noin 10 eri työasemalla ja näiden yhteisessä tietokannnassa on 20 taulua. Sovellus on muuten valmis ja jo käytössä, mutta muutama raportti pitäisi pystyä tulostamaan myös excel-muodossa (paperin lisäksi). En ala kirjoittamaan sovellusta uusiksi excelillä. En usko, että excel on hyvä tietokantasovellusten rakentamistyökalu. Voiko sillä edes tehdä client-server-sovelluksia?

        Tarkoitin, mikset kirjoita yhtä excel -sivupohjaa, joka hakee raportin tietokannasta automaattisesti. Ecxel -pohjan puolestaan voisi jakaa kiinnostuneille käyttäjille. Ymmärtääkseni Excel voisi käyttää vaikka sopivaa kyselyä, joka on laadittu Accessissa, jottei ohjelmointi työ kasvaisi kovin suureksi. Tämä tietysti olettaen, että itse raportti on suhteellisen yksinkertainen, vähän ohjelmoimista vaativa. Toinen oletus on, ettei tietokanta muodosta omaa toimivaa sovellusta, mitä ei tulisi rikkoa.

        Muista että Excelin VBA on formeineen joustava ohjelmointikieli ja ainakin yhteistoimintaa on kuullut mainostettavan. Ei ole kovin huono asia säästää käyttäjää ylimääräiseltä työvaiheelta, jos hän voisi käyttää simppeliä raportointipohjaa.


    • ei hän siinä tartte kuin referenssit Exceliin
      ja siirtää datan sinne.
      Tiedot voit viedä esim. toiseen tauluun ja sitten toiseen teet raportin.En ajanut koodia läpi,mutta luultavasti pitäisi toimia.musita referenssi exceliin....

      Private Sub Tulosta_Click()
      Dim xl As Excel.Application
      Dim Kohde As Workbook
      Dim objDB As Database
      Dim objRS As Recordset
      Dim SQL As String
      Dim luku As Integer
      Set xl = New Excel.Application
      Set Kohde = Workbooks.Open("C:\Lähettämö\Lähete.xls", False, False)
      Set objDB = CurrentDb()
      SQL = "SELECT Merkki,Ovityyppi,Kpl,ToimitettuKpl,OikeaLeveys,OikeaKorkeus,Huom From Tilaukset WHERE Lähetyslista=False AND LaskunNumero= " & CboLaskunnumero & " "
      Set objRS = objDB.OpenRecordset(SQL, dbOpenDynaset)

      Worksheets("Data").Activate
      Range("A2:G1000") = ""
      Range("A2").CopyFromRecordset objRS
      xl.DisplayAlerts = False
      Kohde.Close SaveChanges:=false
      'tähän tulostusalue ja tulostusjutut
      xl.DisplayAlerts = True
      Set xl = Nothing
      Set Kohde = Nothing
      End Sub

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Luetuimmat keskustelut

    1. Miksi persuilla ei ole firmoja?

      Kuten vasemmisstolaisilla, esim. Sannalla MA\PI. Eikö ole aika erikoista?
      Maailman menoa
      82
      7076
    2. Persut hommasivat Suomeen 35 000 pientä lasta v. 2015

      Onko Riikka Purra nyt tavoittelemassa tätä samaa historiallista persujen utopiaa? Purram kaksinaamaisessa pelissä vaadit
      Maailman menoa
      26
      7043
    3. Purran tuhoja tuskin saadaan koskaan korjatuksikaan

      Purra on aiheuttanut Suomen taloudelle karmaisevat tuhot. Sen lisäksi Purra on ajanut myös suuren osan Suomen kansasta k
      Maailman menoa
      106
      6143
    4. Persujen kaksoisstandardit: Räsäsen uhkailu paha, Virran uhkailu hyvä

      Tässä taas nähdään kuinka kaksinaamaista porukkaa persut ovat. Mitäs persut tähän?
      Maailman menoa
      45
      5394
    5. Miksette persut irtisanoudu Kirkin lausunnoista?

      Kirkhän muun muassa vaati raiskattuja naisia pidättäytymään abortista ja vaimoja alistumaan aviomiestensä tahtoon. Mik
      Maailman menoa
      84
      5228
    6. Demarikultin uhri kertoo

      Demarikultin uhri kertoo: “En saanut mennä edes suihkuun ilman lupaa” – Seksuaalisen hyväksikäytön uhri kertoo vuosistaa
      Maailman menoa
      60
      5163
    7. Miksi vasemmistolaiset eivät omista yhtään firmaa?

      Vasemmistolaiset eivät omista yhtään firmaa joka työllistäisi ihmisiä. Miksi? No siksi, että jos vasemmistolainen perus
      Maailman menoa
      40
      5088
    8. Sanna valittiin Euroopan huonoimmaksi pääministeriksi

      Sannan kaudella Suomi oli ainut maa missä bkt laski. Kannattaa huomata, että luvut valitsi Sannan huonoimmaksi. Ihmiset
      Maailman menoa
      27
      4575
    9. Purran vuoro kiihoittua Lepomäen sääristä

      "Ulkoministeri Elina sanoo, ettei muuta pukeutumistaan sen mukaan, kenet tapaa, ja että hän ei suostuisi peittämään kasv
      Maailman menoa
      16
      3447
    10. Vasemmistolaiset paskat eivät nousseet seisomaan kun Akaan kaupunginvaltuusto

      vietti hiljaisen hetken Charlie Kirkin muistoksi https://www.aamulehti.fi/uutiset/art-2000011523016.html
      Maailman menoa
      300
      3370
    Aihe