PHP, MySQL vakantiewerk

**Ywa** · 04/06/08 09:17

Beste,

Ik ben Jarno Veuger en ben 16 jaar. In de zomervakantie heb ik ruim 7 weken vakantie en ik zou in deze periode graag willen werken in de omgeving van Amsterdam.

Ik heb ervaring met (x)HTML, CSS, PHP, MySQL en Delphi (Object Pascal).

Mocht u werk voor mij hebben dan kunt u contact met mij opnemen via e-mail ( jarno[at]veuger[dot]nl ) of reageren op mijn thread.

Ik heb een kleine portfolio van de websites die nu lopen hier staan. Ik werk ook nog aan een aantal projecten.

Met vriendelijke groet,
Jarno Veuger

**Randy** · 04/06/08 10:02

Jarno,

Kun je me even wat voorbeeld designwerk laten zien en/of een (PHP/Perl/Ruby/Python/Bash of ASP/VB/C#/Cobol) codesnippet van een ~40 kbyte. Verder wil ik even weten wat je graag wil verdienen in de maand.
Gegevens mogen naar beheer@ispi.nl

**Ywa** · 04/06/08 17:08

Oorspronkelijk geplaatst door Randy

Kun je me even wat voorbeeld designwerk laten zien en/of een (PHP/Perl/Ruby/Python/Bash of ASP/VB/C#/Cobol) codesnippet van een ~40 kbyte.

Upload pagina van Neem de Tijd.nl als voorbeeld.

PHP Code:


<?php

require_once("configuratie.php");

?>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml">

<head>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />

<link href="ndt.css" rel="stylesheet" type="text/css" />

<title>Uploaden - Neem de Tijd.nl</title>

</head>

<body>

<div align="center">

<h2>Uploaden</h2>

<?

function uploadimage($file,$dir,$filen)

{

    $filename = $filen .".swf";

    if (file_exists($dir . $filename))

    {

        $return = 1;

    }

    elseif (is_uploaded_file($file['tmp_name'])) 

    {

        $return = (move_uploaded_file($file['tmp_name'], $dir . $filename)) ? 2 : 3;

    }

    else

    {

        $return = 4;

    }



    return array('status'=>$return,'filename'=>$filename);

}



if($_SERVER['REQUEST_METHOD'] == 'POST')

{

    if (empty($_POST['titel']) || empty($_POST['bijnaam']))

    {

      echo "Je hebt één of meerdere velden niet ingevuld.<br /><br />";

    }

    else

    {

        $map = 'flash/';

        srand ((double) microtime( )*1000000);

        $willekeurig = rand( ) ."ywaftw". rand( );

        $filen = md5($willekeurig);

        $upload = uploadimage($_FILES['video'],$map,$filen);

    

        $titel = htmlspecialchars(addslashes($_POST['titel']));

        $bijnaam = htmlspecialchars(addslashes($_POST['bijnaam']));

        $ip = $_SERVER['REMOTE_ADDR'];

        

        if($upload['status'] == 2)

        {

            mysql_query("INSERT INTO `videostemp` SET `title` = '". $titel ."', `md5` = '". $filen ."', `submitter` = '". $bijnaam ."', `ip` = '". $ip ."'") or die (mysql_error ());

        }

    

    

        switch ($upload['status'])

        {

            case 1: echo "Uploaden mislukt wegens onbekende reden (Fout code: 1), probeer het later opnieuw.<br /><br />"; break;

            case 2: echo "<b>Bedankt voor het uploaden! Een beheerder zal je Flash controleren en daarna op Neem de Tijd.nl zetten.</b><br /><br />"; break;

            case 3: echo "Uploaden mislukt wegens onbekende reden (Fout code: 2), probeer het later opnieuw.<br /><br />"; break;

            case 4: echo "Er was geen bestand gevonden.<br /><br />"; break;

            case 5: echo "Je kan alleen een SWF bestand uploaden. Heb je een ander soort bestand, neem dan contact met ons op om deze op Neem de Tijd.nl te krijgen.<br /><br />"; break;

            default: echo "Uploaden mislukt wegens onbekende redenen (Fout code: 3), probeer het later opnieuw.<br /><br />"; break;

        }

    }

}

?>

<form name="toevoegform" method="post" action="<?php echo $_SERVER['PHP_SELF']; ?>" enctype="multipart/form-data">

<table width="30%">

<tr>

<td width="30%">Flash bestand</td><td width="70%"><input type="file" name="video" size="40" /></td>

</tr>

<tr>

<td width="30%">Flash titel</td><td width="70%"><input type="text" name="titel" size="30" maxlength="35" /></td>

</tr>

<tr>

<td width="30%">Je (bij)naam *</td><td width="70%"><input type="text" name="bijnaam" size="22" maxlength="30" /></td>

</tr>

<tr>

<td width="30%"></td><td width="70%"><input type="submit" name="toevoegen" value="Uploaden" /></td>

</tr>

<tr>

<td>&nbsp;</td>

</tr>

<tr>

<td><small>* Je (bij)naam wordt niet vermeld bij de Flash.</small></td>

</tr>

</table>

</form><br /><br />

<u><b>Heb je geen SWF bestand, maar bijv. een WMV bestand of iets dergelijks, <a href="contact.php" title="Contact">mail</a> mij dan zodat ik de video kan overzetten en alsnog op Neem de Tijd.nl kan zetten.</b><u/><br /><br />

<small><a href="laatste.html" title="Terug naar de Flashes">Terug naar de Flashes</a> - <a href="contact.php" title="Contact">Contact</a></small><br /><br />

</div>

</body>

</html>

Voorbeeld van een stukje Delphi (Object Pascal) code van FileListDownloader (download programma voor eigen gebruik).

Code:

procedure TfrmMain.btnStartClick(Sender: TObject);
var
  i : Integer;
  Arr1, Arr2 : TSplitArray;
  Tmp : String;
begin
  If (edtDestination.Text = '') Then
  Begin
     ShowMessage('Please define the destination folder.');
     Exit;
  End;
  If (lstFiles.Lines.Count < 1) Then
  Begin
    ShowMessage('Need atleast 1 file to download!');
    Exit;
  End;
  btnStart.Enabled := False;
  btnBrowse1.Enabled := False;
  btnBrowse2.Enabled := False;
  lstFiles.Enabled := False;
  cbxRS.Enabled := False;
  prbProgress.Max := lstFiles.Lines.Count;
  prbProgress.Min := 0;
  prbProgress.Position := 0;
  prbProgress2.Max := 100;
  prbProgress2.Min := 0;
  prbProgress2.Position := 0;
  lblInfo2.Caption := 'Size: 0/0';
  lblFileOf.Caption := 'File: 0/'+ IntToStr(lstFiles.Lines.Count);
  lblCurrent.Caption := 'Downloading: -/-';

  for i := 0 to Pred(lstFiles.Lines.Count) do
  begin
    lblFileOf.Caption := 'File: '+ IntToStr(i+1) +'/'+ IntToStr(lstFiles.Lines.Count);
    lblCurrent.Caption := 'Adding to list: '+ lstFiles.Lines.Strings[i];
    if not (lstFiles.Lines.Strings[i] = '') then
    begin
      with Copy.Items.Add do
      begin
        URL := lstFiles.Lines.Strings[i];
        Protocol := wpHTTP;
        FileDate := EncodeDate(2002,3,18);
        CopyNewerOnly := False;
        TargetDir := edtDestination.Text;
      end;
    end;
    Application.ProcessMessages;
    prbProgress.Position := prbProgress.Position + 1;
  end;
  btnCancel.Enabled := True;
  prbProgress.Position := 0;

  Copy.Execute; // Start the download :D
  SpeedCheck.Enabled := True;
end;

Oorspronkelijk geplaatst door Randy

Verder wil ik even weten wat je graag wil verdienen in de maand.
Gegevens mogen naar beheer@ispi.nl

Maakt mij niet erg veel uit. Het gaat vooral er bij mij om dat ik op een professioneel niveau leer werken.

**Ywa** · 08/06/08 11:19

Ik ben nog steeds beschikbaar. Ik heb alleen nog maar losse opdrachten binnen gekregen, maar mijn voorkeur gaat uit op locatie werken.

**Ywa** · 04/07/08 17:53

Bump.

Ik heb een week gewerkt bij een bedrijf, maar wegens omstandigheden heb ik daar ontslag genomen. Dus voor de rest van de zomervakantie zoek ik nog werk in de omgeving van Amsterdam.

**Ywa** · 28/07/08 17:47

Bump.

Weinig vakantie weken nog te gaan jammer genoeg. Maar in andere vakanties ben ik natuurlijk ook beschikbaar. Tenzij ik op vakantie ga, maar de komende vakanties ga ik niet in ieder geval niet.

Onderwerp Gereedschap

Toon

Onderwerp: PHP, MySQL vakantiewerk

PHP, MySQL vakantiewerk

Webhostingtalk.nl

Link met ons

Partners

Contact