Gå til innhold

Anbefalte innlegg

Videoannonse
Annonse

#/usr/bin/perl

 

#trenger denne modulen

use DBI;

 

#kobler seg til databasen

my $db = DBI->connect(DBI:mysql:$databasename:$hostname,$username,$password)

or die "Can't connect to mysql: $db->errstrn";

 

#setter opp en sql spørring (les på SQL spørringer og/eller spør her i forumet)

$query=$db->prepare("SELECT * FROM tabellnavn WHERE id='1'");

 

#utfører spørringen

if($query->execute())

{

print "sql spørringen er utført";

} else {

print "feilmelding";

}

 

#henter ut dataen

while(@row=$query->fetchrow_array)

{

#printer ut felt 1, 2 og 3 fra hver rekke

print @row[0]." ".@row[1]." ".@row[2]."n";

}

 

#avslutter database tilkoblingen

$db->disconnect;

 

 

Der har du en grei introduksjon på norsk. Resten er egentlig bare SQL spørringer. F.eks. skal du slette en rad endrer du bare $query->prepare til: "DELETE FROM tabell WHERE id='2'" eller noe i den dur. Og såklart fjerner koden for å hente ut data da.

Lenke til kommentar

Opprett en konto eller logg inn for å kommentere

Du må være et medlem for å kunne skrive en kommentar

Opprett konto

Det er enkelt å melde seg inn for å starte en ny konto!

Start en konto

Logg inn

Har du allerede en konto? Logg inn her.

Logg inn nå
×
×
  • Opprett ny...