SPOPS :: MANUAL :: Object SPOPS :: Handmatig :: Object is een PERL-module die laat zien hoe u communiceert met SPOPS-objecten.
Download nu

SPOPS :: MANUAL :: Object Rangschikking & Samenvatting

SPOPS :: MANUAL :: Object Tags

Perl-module object wisselwerking Spopt objecten SPOPS Object-interactie

SPOPS :: MANUAL :: Object Beschrijving

SPOPS :: Handmatig :: Object is een PERL-module die laat zien hoe u communiceert met SPOPS-objecten. SPOPS :::: Object :: Object is een PERL-module die laat zien hoe u communiceert met SPOPS-objecten. Deze sectie van de handleiding van het spieden moet van belang zijn voor gebruikers en ontwikkelaars, omdat het beschrijft hoe spoppenobjecten worden gebruikt. Merk op dat alle voorbeelden hier aannemen dat de SPOPS-klasse al is gemaakt - voor meer op dit zie spies :: Handmatig :: Configuratie en spanden :: Handmatig :: Codegeneratie voor meer informatie over dat proces. Een eenvoudig uiterst de urd Een eenvoudig voorbeeld. Hier krijgen we waarden van CGI.PM, stel de waarden in een nieuwe spandenobject in en bewaar het: 1: Mijn $ Q = Nieuwe CGI; 2: mijn $ obj = myuserclass-> nieuw (); 3: Forreach My $ Field (QW (F_Name L_Name geboortedatum)) {4: $ obj -> {$ field} = $ q-> param ($ veld); 5:} 6: Mijn $ Object_ID = Eval {$ OBJ-> SAVE}; 7: if ($ @) {8: ... Rapporteer Foutinformatie ... 9:} 10: anders {11: Warn "-object opgeslagen met ID: $ OBJ -> {Object_id} N"; 12:} U kunt vervolgens de informatie van dit object weergeven vanaf een later verzoek: 1: Mijn $ Q = Nieuwe CGI; 2: Mijn $ Object_ID = $ Q-> Param ('Object_ID'); 3: Mijn $ OBJ = MyUserClass-> Fetch ($ Object_ID); 4: Print "Voornaam: $ OBJ -> {f_name} n", 5: "Achternaam: $ obj -> {l_name} n", 6: "Verjaardag: $ obj -> {birthdate} n"; Andere informatie van hetzelfde object, zoals gerelateerde objecten: 1: mijn $ user_group = $ OBJ-> -groep; 2: Print "Groepsnaam: $ user_group -> {naam} n"; en u kunt batches van objecten ophalen op een afstand op basis van willekeurige criteria: 1: mijn $ q = nieuwe CGI; 2: My $ Last_Name = $ q-> param ('last_name'); 3: My $ User_List = MyUserClass-> Fetch_group ({Where => 'L_Name zoals?', 4: Waarde => , 5: Order => 'Geboortedatum'}); 6: Print "-gebruikers met achternaam met: $ last_NNONEN"; 7: Foreach My $ user (@ {$ user_list}) {8: Print "$ Gebruiker -> {f_name} $ Gebruiker -> {l_name} - $ user -> {birthdate} n"; 9:} Vereisten: · Perl

SPOPS :: MANUAL :: Object Gerelateerde software