 Willkommen auf dem Portal für Mediengestalter
|
|
|
| Autor |
Nachricht |
markkus14
Threadersteller
Dabei seit: 29.11.2008
Ort: -
Alter: -
Geschlecht: 
|
Verfasst Sa 29.11.2008 12:10
Titel [PHP / ASP] Uploader - brauche Hilfe |
  |
|
Hallooo.
Bin ein kompletter Anfänger in PHP oder Java Script oder sonstige Internetsprachen.
Brauche einen Datei Upload für .tif Datein (Bilder)
Habe selbst in der Firma einen Server stehen (auch mit IIS)
Habe mir jetzt gedacht, dass ich diesen Upload statt meinen Ftp server verwende (hab nur eine testversion und kann nur 5 benutzer registrieren)...
Habe mir auch schon die Beiträge da durchgelesen und wollte es elber ausprobieren,
hat aber nicht geklappt 
Bitte wäre einer so nett um mir ein Skript zu schreiben, womit ich einfach mehrere Datein auf meinen Server auf ein bestimmtes Verzeichnis (C:\Upload\) oder so speichern kann (ohne igrendeine vpn Verbindung...)
(So wie rapidshare in etwa nur nicht so, dass ich die dateien nachern share)
Also einfach eine Webseite wo steht dateiupload mit einem Textfeld und daneben einen button, wo ich sagen kann welche dateien. Darunter einen button mit Senden und die Datei soll dann am Server in einem bestimmten verzeichniss sein.
MfG. Markkus14
[verschoben von webhosting und internetzugang nach programmierung]
Zuletzt bearbeitet von Smooth-Graphics am Fr 12.12.2008 14:47, insgesamt 4-mal bearbeitet
|
|
| |
  |
 |
m
Moderator
Dabei seit: 18.11.2004
Ort: -
Alter: -
Geschlecht:
|
|
| |
 |
|
|
Anzeige
|
|
|
markkus14
Threadersteller
Dabei seit: 29.11.2008
Ort: -
Alter: -
Geschlecht:
|
Verfasst Sa 29.11.2008 13:41
Titel
|
|
|
|
...danke...Ich habe jetzt schon alles ausprobiert, aber es geht nICHTS!!!!!!
|
|
| |
|
|
m
Moderator
Dabei seit: 18.11.2004
Ort: -
Alter: -
Geschlecht:
|
Verfasst Sa 29.11.2008 13:53
Titel
|
|
|
Hast du dir das Thema mal durchgelesen?
Dann könntest du ja z.B. mal beschreiben was du versucht hast, oder eine Gegenleistung anbieten,
oder sonst etwas wie in dem Thema erwähnt. Du wirst hier niemanden finden der dir deine Arbeit
komplett abnimmt ohne dass du etwas dafür tust.
Zuletzt bearbeitet von m am Sa 29.11.2008 13:54, insgesamt 1-mal bearbeitet
|
|
| |
|
|
markkus14
Threadersteller
Dabei seit: 29.11.2008
Ort: -
Alter: -
Geschlecht:
|
Verfasst Sa 29.11.2008 14:38
Titel
|
|
|
okay...
so ich beschreib mal mein Problem: habe es geschafft auf meinen IIS php zu installieren, bekomme aber noch fehlermeldunge...
Kann sich bitte wer mal die Sources durchlesen?
:
Hier meine Index.html:
Das Formular
| Code: |
<form enctype="multipart/form-data" action="\act.php" method="POST">
<!-- MAX_FILE_SIZE must precede the file input field -->
<input type="hidden" name="MAX_FILE_SIZE" value="30000" />
<!-- Name of input element determines name in $_FILES array -->
Send this file: <input name="userfile" type="file" />
<input type="submit" value="Send File" />
</form>
|
Aber an dieser wirds nicht liegen..
Hab dann probiert diese .php datei zusammenzustückeln:
| Code: |
<?php
$uploaddir = 'C:\test\';
$uploadfile = $uploaddir . basename($_FILES['userfile']['name']);
echo '<pre>';
if (move_uploaded_file($_FILES['userfile']['tmp_name'], $uploadfile)) {
echo "File is valid, and was successfully uploaded.\n";
} else {
echo "Possible file upload attack!\n";
}
echo 'Here is some more debugging info:';
print_r($_FILES);
print "</pre>";
?>
|
bekomme aber Diese Fehlermeldung:
| Code: |
Parse error: syntax error, unexpected T_STRING in C:\Inetpub\wwwroot\- on line 42
|
----------------
| Zitat: |
eine Gegenleistung anbieten
|
Hmm okay...Welche?? Mir fällt da nichts ein..
Glaube kaum das irgendjemand ein Vb Program oder sonst was von mir haben will oder???
---------------
Gut dann hab ich noch ausprobiert ob es mit ASP funktioniert:
Hier mal meine sources: (sind nicht meine hab den ganzen Morgen mit goooogln verbracht)
| Code: |
<html>
<head>
<title>Dateiupload per ASP</title>
</head>
<body>
<form method="POST" action="empfang.asp" enctype="multipart/form-data" target="_new">
<input type="file" name="File" size="50"><br>
<input type="submit" value="DATEIUPLOAD STARTEN" name="Submit">
</form>
</body>
</html>
|
Hier die empfang.asp
| Code: |
<html>
<head>
<title>Dateiupload per ASP</title>
</head>
<body bgcolor="white">
<%=Font%>
<%
' --- ASP FileUpload Modul GetFILE (C) 1999 by Stefan Falz
' --- Fehlerbehandlung aktivieren
' --- On Error Resume Next
' --- Zuweisen der Fehlerquelle, die bei einem Fehler ausgegeben werden soll
Err.Source = "GetFILE HTTP-Upload"
' --- Konstante für Fehlerüberschrift
Const ErrHeader = "<b>Fehler</b><br><br>"
' --- Array deklarieren
Dim ErrArray(4)
ErrArray(0) = "10900 - Ihre gesendete Datei ist zu groß."
ErrArray(1) = "10901 - Unbekannter Fehler.<br>"
ErrArray(2) = "10902 - Es wurde keine Datei gesendet oder die Übertragung ist fehlerhaft.<br>"
ErrArray(3) = "10903 - Es wurde keine Textdatei gesendet.<br>"
' -- Aufrufen der Subroutine GetFILE
Call GetFILE()
Private Sub GetFile()
' --- In dieser Subroutine wird der HTTP-Stream ausgelesen
' --- Deklarieren der Variablen
Dim FileText
FileText = Request.BinaryRead(Request.TotalBytes)
Dim FileTextByte
FileTextByte = ""
Dim FileTextNew
FileTextNew = ""
Dim FilePosFirst
FilePosFirst = 0
Dim FilePosLast
FilePosLast = 0
Dim FileType
FileType = ""
Dim strRevText
strRevText = ""
Dim strFileName
strFileName = ""
Dim strFileNameOnly
strFileName = ""
Dim posFileName
posFileName = 0
Dim rghFile
rghFileName = ""
Dim lenFileTextByte
lenFileTextByte = 0
' --- Angeben der max. Dateigröße + ca. 500 Byte für Dateiinformationen
Dim maxLength
maxLength = 25500
' --- Abfrage der Größe des gesendeten Streams
If Request.TotalBytes > maxLength Then
Call Error_Handler(10900)
Exit Sub
End if
' --- Suchen nach HexCode 0D 0A 0D 0A (Dateianfang innerhalb des HTTP-Streams)
FilePosFirst = InStrB(FileText, (ChrB(13) & ChrB(10) & ChrB(13) & ChrB(10)))
' --- Suchen nach HexCode 0D 0A 2D 2D (Dateiende innerhalb des HTTP-Streams)
FilePosLast = InStrB(FileText, (ChrB(13) & ChrB(10) & ChrB(45) & ChrB(45)))
' --- Suchen nach HexCode 2D 0A 0D innerhalb des umgedrehten HTTP-Streams, da unter
' --- Umständen mehrere Dateiendekennzeichen vorhanden sind.
strRevText = StrReverse(FileText)
FilePosLast = InStrB(strRevText, (ChrB(45) & ChrB(10)) & ChrB(13))
FilePosLast = LenB(FileText) - FilePosLast
' --- Abbruch bei Dateigröße 0 Byte
If FilePosFirst = 0 Or FilePosLast = 0 Or FilePosLast - FilePosFirst < 5 Then
Call Error_Handler(10902)
Exit Sub
End If
' --- Abbruch bei fehlender Angabe "Content-Disposition"
If InStrB(FileText, ChrB(67) & ChrB(111) & ChrB(110) & ChrB(116) & ChrB(101) & ChrB(110) & ChrB(116) & ChrB(45) & ChrB(84) & ChrB(121) & ChrB(112) & ChrB(101) & ChrB(58) & ChrB(32) & ChrB(116) & ChrB(101) & ChrB(120) & ChrB(116) & ChrB(47)) = 0 Then
Call Error_Handler(10903)
Exit Sub
End if
' --- Abbruch, wenn ein Fehler aufgetreten ist, der nicht zu den obigen Fehlern gehört
If Err.Number <> 0 Then
Call Error_Handler(10901)
Exit Sub
End if
' --- Ermittlung des Dateinamens inkl. Pfad innerhalb des HTTP-Streams
posFileName = InStrB(FileText, ChrB(102) & ChrB(105) & ChrB(108) & ChrB(101) & ChrB(110) & ChrB(97) & ChrB(109) & ChrB(101) & ChrB(61) & ChrB(34)) + 9
rghFileText = RightB(FileText, LenB(FileText) - posFileName)
strFileName = LeftB(rghFileText, InStrB(rghFileText, ChrB(34)) - 1)
Response.Write "<strong>Dateiname inkl. Pfad: </strong>"
Response.BinaryWrite strFileName
Response.Write "<br>"
' --- Ermittlung des Dateinamens exkl. Pfad innerhalb des HTTP-Streams
posLastSlash = InStrB(StrReverse(strFileName), ChrB(92))
strFileNameOnly = MidB(strFileName, LenB(strFileName) - posLastSlash, posLastSlash + 1)
Response.Write "<strong>Dateiname exkl. Pfad: </strong>"
Response.BinaryWrite strFileNameOnly
Response.Write "<br>"
' --- Abbruch, wenn ein Fehler aufgetrten ist
If Err <> 0 Then
Call Error_Handler(10901)
Exit Sub
End if
' --- Schreiben des Dateiinhalts in ByteArray
FileTextByte = MidB(FileText, (FilePosFirst + 4), (FilePosLast - (FilePosFirst + 4)))
' --- Ermittlung der Dateigröße durch Auslesen der Länge des ermittelten Dateiinhalts
lenFileTextByte = LenB(FileTextByte)
' --- Konvertierung des Dateiinhalts (Binärstream) in Ascii-Zeichen
For i = 1 To lenFileTextByte
FileTextNew = FileTextNew & Chr(AscB(MidB(FileTextByte, i, 1)))
Next
' --- Schreiben des ermittelten Dateiinhalts in eine Datei.
Set objFileSys = Server.CreateObject("Scripting.FileSystemObject")
Set File = objFileSys.CreateTextFile(Server.MapPath("./") & "\" & Session.SessionID & ".tmp", True, False)
File.WriteLine CStr(FileTextNew)
File.Close
Set File = Nothing
Set objFileSys = Nothing
' --- Ausgeben der Dateigröße in Bytes
Response.Write "<strong>Dateigröße: </strong>" & lenFileTextByte & " Byte.<br><br>"
' --- Konvertieren des Dateiinhalts, da HTML-Seiten nicht korrekt angezeigt werden
FileTextNew = Replace(FileTextNew, "<", "<")
FileTextNew = Replace(FileTextNew, ">", ">")
FileTextNew = Replace(FileTextNew, VbCrLf, "<br>" & VbCrLf)
FileTextNew = Replace(FileTextNew, Chr(9), " ")
' --- Ausgabe des Dateiinhalts
Response.Write FileTextNew
End Sub
Private Sub Error_Handler(intErrNumber)
' --- Ermitteln des übergebenen Fehlercodes und Ausgabe am Bildschirm
Select Case intErrNumber
Case 10900: Response.Write ErrHeader & ErrArray(0)
Case 10901: Response.Write ErrHeader & ErrArray(1)
Case 10902: Response.Write ErrHeader & ErrArray(2)
Case 10903: Response.Write ErrHeader & ErrArray(3)
Case Else: Response.Write ErrHeader & Err.Description
End Select
Exit Sub
End Sub
%>
</body>
</html>
|
MUss dazusagen, es stamm von der Seite: http://aktuell.de.selfhtml.org/artikel/asp/asp-upload/
Bekomme da Diese Fehlermeldung:
| Code: |
Anforderungsobjekt Fehler "ASP 0104 : 80004005'
Der Vorgang ist nicht erlaubt
/empfang.asp, line 35
|
Pls help meee..
Verstehe fast gar nichts davon. Hab jetzt fast alles ausprobiert und komme noch nicht weiter...(
|
|
| |
|
|
m
Moderator
Dabei seit: 18.11.2004
Ort: -
Alter: -
Geschlecht:
|
Verfasst Sa 29.11.2008 14:48
Titel
|
|
|
Ok, ist doch schon mal ein Anfang, dann verschiebe ich das Thema mal nach Programmierung. 
|
|
| |
|
|
markkus14
Threadersteller
Dabei seit: 29.11.2008
Ort: -
Alter: -
Geschlecht:
|
Verfasst Fr 12.12.2008 13:48
Titel
|
|
|
asöö war falsch sry^^
ja also wenn euch irgendwas dazu einfällts pls sagen...
ich bin bitte noch immer daran interessiert, dass diese codes funktionieren..
wenigstens einen link oder igrendwas anderes...plz...
MfG
Zuletzt bearbeitet von m am Fr 12.12.2008 13:49, insgesamt 1-mal bearbeitet
|
|
| |
|
|
| |
|
|
| Ähnliche Themen |
ftp uploader
ftp uploader
Uploader->linkanzeige
Bildergallery+Text + Uploader
File Uploader für eigenes CMS
Session Problem mit Flash Uploader
|
|
|
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
|
|
