Üdv Mindenkinek !
A kérdésem a következő.
Hogyan lehet egy űrlapon belül egy gomb segítségével megnyitni egy másik táblát vagy űrlapot?
Előre is köszi!
vezérlő gomb
vezérlő gomb
Ms Windows XP • 3.0.X • Ms Windows XP
- r4zoli
- Site Admin
- Hozzászólások: 850
- Csatlakozott: 2008. február 17., vasárnap 4:52
- Tartózkodási hely: Budapest
Re: vezérlő gomb
Makró segítségével, a Switchboard kiterjesztés is azért készült mert a Base alapból nem tartalmazza ezt a lehetőséget.
Olvasd el, és lehetőleg tartsd be az útmutatót a fórum használatához.
AOO 3.4.1 win7, LibO 4.0 win7.
AOO 3.4.1 win7, LibO 4.0 win7.
Re: vezérlő gomb
Helló!
A célom nekem is az lenne, hogy egy gomb megnyomásával meghívjak egy másik kész űrlapot!
3.1.1 OOO-t használok (már) de a Makrókhoz nem értek!
Ezt találtam de nem sikerült elindítani:
ThisDatabaseDocument.FormComponents.getByName( "urlap_neve").open
Tudna valaki segíteni, hogyan kell ezt megírni, illetve használni, vagy ha lenne egy kicsi minta az lenne a legjobb!
Eddig keresgettem , de nem igazán jött össze, az angol nyelvű oldalak meg nehezen érthetők számomra.!
Előre is köszönettel.: Mytom
A célom nekem is az lenne, hogy egy gomb megnyomásával meghívjak egy másik kész űrlapot!
3.1.1 OOO-t használok (már) de a Makrókhoz nem értek!
Ezt találtam de nem sikerült elindítani:
ThisDatabaseDocument.FormComponents.getByName( "urlap_neve").open
Tudna valaki segíteni, hogyan kell ezt megírni, illetve használni, vagy ha lenne egy kicsi minta az lenne a legjobb!
Eddig keresgettem , de nem igazán jött össze, az angol nyelvű oldalak meg nehezen érthetők számomra.!
Előre is köszönettel.: Mytom
Ms Windows XP/WIN7 • 3.0.X/3.2.1 • Ubuntu 8.x/9X/10X
Re: vezérlő gomb
Megvan a megoldás , nálam mint írtam 3.1.1-es office van és hibátlanul működik!
sub openform_again
dim oCurrentController
'Variables for document what will be opened
dim sNewfileFormName ' This is the name how it is in the database
dim oNewformtoSee ' Object for the new form what will beopend
sNewfileFormName="invoerveld20" 'is a writer form it must be in this database
'ThisDatabaseDocument 'ThisDatabaseDocument is a new constant in OOO3.0
oCurrentController=ThisDatabaseDocument.CurrentController
if ThisDatabaseDocument.FormDocuments.hasbyname(sNewfileFormName) then
' the form exist and can maybe opend
oNewformtoSee=oCurrentController.loadComponent( com.sun.star.sdb.application.DatabaseObject.FORM,sNewfileFormName,FALSE) ' or TRUE for editing the documentwait 10
else
msgbox "The does not exist and cannot be opend"
end
end if
end sub
invoerveld20= ülap neve (magyar ékezeteseket nem szereti)
Makro-ba benásolod azt hozzárendeled amihez és ahogy akarod és kész!
sub openform_again
dim oCurrentController
'Variables for document what will be opened
dim sNewfileFormName ' This is the name how it is in the database
dim oNewformtoSee ' Object for the new form what will beopend
sNewfileFormName="invoerveld20" 'is a writer form it must be in this database
'ThisDatabaseDocument 'ThisDatabaseDocument is a new constant in OOO3.0
oCurrentController=ThisDatabaseDocument.CurrentController
if ThisDatabaseDocument.FormDocuments.hasbyname(sNewfileFormName) then
' the form exist and can maybe opend
oNewformtoSee=oCurrentController.loadComponent( com.sun.star.sdb.application.DatabaseObject.FORM,sNewfileFormName,FALSE) ' or TRUE for editing the documentwait 10
else
msgbox "The does not exist and cannot be opend"
end
end if
end sub
invoerveld20= ülap neve (magyar ékezeteseket nem szereti)
Makro-ba benásolod azt hozzárendeled amihez és ahogy akarod és kész!
Ms Windows XP/WIN7 • 3.0.X/3.2.1 • Ubuntu 8.x/9X/10X