Teen tietokantaa Accessilla.
Olen katsonut ohjeesta F1 sekä etsinyt kirjoista ja googlettanut ja lisäksi kokeillut SQL, VB, makroja, linkitystä jne… mutta alla olevaan ongelmaan en ole löytänyt ratkaisua.
Lomakkeella on tiedot osassa taulukkomuotoinen lomake, jossa on sotu, asiakkaan suku- ja etunimi.
Lomakkeella on alatunnisteessa muokkaa painike, joka avaa uuden lomakkeen (muokkaa asiakas), jossa voi muokata kaikkia asiakkaan tietoja.
Nyt pitäisi saada taulukkomuotoisessa lomakkeessa valitun asiakaan tiedot näkymään muokkaa asiakas lomakkeella, kun painetaan muokkaa painiketta.
Tällä hetkellä näkyy aina ensimmäisen asiakkaan tiedot ei siis taulukkomuotoisella lomakkeella valitun asiakkaan. Voidaan tietysti tietue valitsimella mennä halutun asiakkaan kohdalle tai etsi kohtaan kirjoittaa asiakkaan nimi, jolloin halutun asiakkaan tiedot avautuvat lomakkeelle mutta nyt haluaisin niin, että avautuisi heti painiketta painettaessa ja lomakkeen avautuessa valitun asiakkaan tiedot esille.
Onkohan tämä yleensä mahdollista lomakkeiden välillä ja jos on, niin miten se tulisi tehdä?
Lomake ongelma
5
668
Vastaukset
Tuossa esimerkki omasta laskutussovelluksestani, jossa päävalikosta voi avata tilauslomakkeen, samalla päävalikko sulkeutuu. Laita painikkeeseen tapahtumatoimintosarja soveltaen seuraavaa tekstiä:
Private Sub Komento2_Click()
DoCmd.Close
DoCmd.OpenForm "Tilauslomake"
End Sub
Ja tässä esimerkki jossa tilauslomakkeella olevalla painikkeella voi avata ko. tilausta koskevan laskun:
Private Sub ShowInv_Click()
Dim strDocName As String
Dim strwhere As String
strDocName = "Lasku"
strwhere = "TilausNo=" & Me!TilausNo
If Laskutettu = False Then
msgbox "Tilausta ei ole laskutettu, toiminto keskeytetty."
Exit Sub
End If
DoCmd.OpenReport strDocName, acViewReport, , strwhere
End Sub- Lomake ongelma
Kiitos vastauksestasi.
Yritin soveltaa ehdottamastasi koodista mutten saanut mitään uutta aikaiseksi.
Laitan tähän vielä hieman tietoa ongelmastani, jos viitsit vielä hieman pohtia.
Rakenne:
”Päälomakkeeseen” on liitetty alilomake, josta valitaan asiakas.
”Päälomakkeella” on muokkaa painike, josta avautuu asiakaslomake,
jossa pystyy muokkaamaan asiakkaan tietoja.
Muokkaa painiketta painettaessa asiakaslomakkeelle avautuu aina
alilomakkeella ensimmäisenä olevan asiakkaan tiedot ei siis sen asiakkaan
tiedot, jonka olin valinnut (aktivoinut) alilomakkeella.
Kaikkien asiakkaiden tiedot kyllä löytyvät asiakaslomakkeelta haku tai eteen/taakse toiminnolla.
Luulisitko, että ongelma liittyisi siihen, kun päälomakkeella on muokkaa painike ja kuitenkin päälomakkeella olevalta alilomakkeelta halutaan tietoa vielä uuteen lomakkeeseen eli lomakkeelta lomakkeelle hyppimistä? Lomake ongelma kirjoitti:
Kiitos vastauksestasi.
Yritin soveltaa ehdottamastasi koodista mutten saanut mitään uutta aikaiseksi.
Laitan tähän vielä hieman tietoa ongelmastani, jos viitsit vielä hieman pohtia.
Rakenne:
”Päälomakkeeseen” on liitetty alilomake, josta valitaan asiakas.
”Päälomakkeella” on muokkaa painike, josta avautuu asiakaslomake,
jossa pystyy muokkaamaan asiakkaan tietoja.
Muokkaa painiketta painettaessa asiakaslomakkeelle avautuu aina
alilomakkeella ensimmäisenä olevan asiakkaan tiedot ei siis sen asiakkaan
tiedot, jonka olin valinnut (aktivoinut) alilomakkeella.
Kaikkien asiakkaiden tiedot kyllä löytyvät asiakaslomakkeelta haku tai eteen/taakse toiminnolla.
Luulisitko, että ongelma liittyisi siihen, kun päälomakkeella on muokkaa painike ja kuitenkin päälomakkeella olevalta alilomakkeelta halutaan tietoa vielä uuteen lomakkeeseen eli lomakkeelta lomakkeelle hyppimistä?"Muokkaa painiketta painettaessa asiakaslomakkeelle avautuu aina
alilomakkeella ensimmäisenä olevan asiakkaan tiedot ei siis sen asiakkaan
tiedot, jonka olin valinnut (aktivoinut) alilomakkeella."
Tuo esimerkkikoodi toimii vain siinä tapauksessa että ohjausobjektien nimet ovat samat. Siitä soveltaen voit saada jotakin tapahtumaan kun:
* Nimeät omat ohjausobjektisi ja käytät samoja nimiä sitten koodissasi.
* Ratkaiseva on tuo StrWhere-lauseke, siinä määritellään mikä tietue tulee näyttöön kun alilomake avataan. Ja kun on lomake kysymyksessä niin tietenkin muotoa "OpenForm"
* Tuossa esimerkissä ei tarvitse välittää tuosta If-lausekkeesta sitä ei tässä tarvita
Itse ostin aikanaan tuollaisen kirjan, se on Acces 2003:lle tehty mutta Acces 2007 ymmärtää ihan samaa tekstiä. Suosittelen. Samasta kaupasta löytyy nyt näköjään Acces 2007:lle kirjoitettuja kirjoja:
http://www.amazon.co.uk/Access-Programmers-Reference-Press-Programmer/dp/0764559036/ref=sr_1_8?ie=UTF8&s=books&qid=1269958047&sr...
BTW. Ettet joutuisi lomakkeiden sekamelskaan, laita uuden lomakkeen avauskoodiin lauseke joka sulkee lomakkeen jolta olet poistumassa.Kassara kirjoitti:
"Muokkaa painiketta painettaessa asiakaslomakkeelle avautuu aina
alilomakkeella ensimmäisenä olevan asiakkaan tiedot ei siis sen asiakkaan
tiedot, jonka olin valinnut (aktivoinut) alilomakkeella."
Tuo esimerkkikoodi toimii vain siinä tapauksessa että ohjausobjektien nimet ovat samat. Siitä soveltaen voit saada jotakin tapahtumaan kun:
* Nimeät omat ohjausobjektisi ja käytät samoja nimiä sitten koodissasi.
* Ratkaiseva on tuo StrWhere-lauseke, siinä määritellään mikä tietue tulee näyttöön kun alilomake avataan. Ja kun on lomake kysymyksessä niin tietenkin muotoa "OpenForm"
* Tuossa esimerkissä ei tarvitse välittää tuosta If-lausekkeesta sitä ei tässä tarvita
Itse ostin aikanaan tuollaisen kirjan, se on Acces 2003:lle tehty mutta Acces 2007 ymmärtää ihan samaa tekstiä. Suosittelen. Samasta kaupasta löytyy nyt näköjään Acces 2007:lle kirjoitettuja kirjoja:
http://www.amazon.co.uk/Access-Programmers-Reference-Press-Programmer/dp/0764559036/ref=sr_1_8?ie=UTF8&s=books&qid=1269958047&sr...
BTW. Ettet joutuisi lomakkeiden sekamelskaan, laita uuden lomakkeen avauskoodiin lauseke joka sulkee lomakkeen jolta olet poistumassa.Kävin toiselta koneelta kopsaamassa oman vastaavan koodini, toimii ainakin minulla:
Private Sub ShowCustomer_Click()
Dim strDocName As String
Dim strwhere As String
strDocName = "Asiakas"
strwhere = "AsiakasNo=" & Me!AsNo
DoCmd.OpenForm strDocName, acViewNormal, , strwhere
End Sub- Lomake ongelma
Kassara kirjoitti:
Kävin toiselta koneelta kopsaamassa oman vastaavan koodini, toimii ainakin minulla:
Private Sub ShowCustomer_Click()
Dim strDocName As String
Dim strwhere As String
strDocName = "Asiakas"
strwhere = "AsiakasNo=" & Me!AsNo
DoCmd.OpenForm strDocName, acViewNormal, , strwhere
End SubSuuret kiitokset!
Sain koodin toimimaan haluamallani tavalla.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Valtion alijäämä = yritystukien määrä = 10 mrd. euroa
Mutta persut eivät vaan suostu tasapainottamaan valtion budjettia, vaikka yritystuet on tiedetty haitallisiksi. Miksi p576443Suomi käyttää sosiaalietuuksiin suhteessa eniten rahaa koko maailmassa
Suomi käyttää sosiaaliturvaetuuksiin enemmän rahaa suhteessa bruttokansantuotteeseen kuin mikään muu maa maailmassa. Su3415484Poliisien suosikkipuolueet ylivoimaisesti: Kokoomus ja persut
samoin on armeijan henkilöstön kanssa. Sen sijaan sekä vihreät, vasliitto ja SDP ovat hyljeksittyjä puolueita poliisien1685136Sdp, Vihreät ja vasemmistoliitto muuttumassa naisten puolueiksi?
Sdp 64 % naisia, vihreät 70 % naisia ja vasemmistoliitto 60 % naisia. Ilmankos ne puolueet ajaa autoilevien kantasuomal1404924Epäonnistunut "Tuppurais-operaatio" kaatoi Purran hallituksen
Persut yrittivät viimemetreillä häivyttää omaa täydellistä epäonnistumistaan syyttämällä opposition edustajaa nimettömil204170Grahn-Laasonen: "Kansalainen joutuu pettymään, jos demareita äänestää"
Ministeri viittaa tuoreeseen Helsingin Sanomien juttuun, jossa demarijohtajan keinoja Suomen suunnan muuttamiseksi esite412836Ostaisitko sinä rempattavan asunnon Italiasta tai jostain muualta ulkomailta, mistä?
Ella Kanninen on tehnyt Italiassa asuntokaupat. Hän kertoo Instagramissa kierrelleensä viime kesänä Toscanassa katselema202666Jenni Alexandrova ja Toni Lähde ratkeavat liitoksistaan - Tällainen on uusperhe!
Radiojuontaja Jenni Alexandrova ja Diili-tuttu Toni Lähde ovat pariskunta, joka elää uusperhearkea. He ovat ostaneet uud32448Vähän fiksumpi Nimi kisa ? :=)
Kirjoita teidän etunimet allekkain. Jos nimissä on joku kirjain sama, poista se. Tee sama tarkistus kaikille kirjaimill282387- 792086