Results 1 to 2 of 2

Thread: Bilder aktualisieren!! need help

  1. #1
    dreamworker.de Beginner
    Join Date
    01/2003
    Posts
    1

    Bilder aktualisieren!! need help

    Hi leute!

    arbeite mit ultradev asp und access. ich habe eine site erstellt mit db anbindung alles ok hab auch den admin fertig und kann eingeben aktualisieren und löschen.

    mein problem:

    ich hab pure asp upload eingebunden für die bilder und es funzt auch prächtig ich weiss jetzt nur nicht wie kann ich die bilder bzw pfade in der db aktualisieren, oder wenn der datensatz noch kein bild hat eines anfügen mit durchsuchen???

    bitte um hilfe

    vielen dank philipp

  2. #2
    die Gütige ... Gudula's Avatar
    Join Date
    04/2001
    Location
    aus dem Sauerland
    Posts
    10.333

    Re: Bilder aktualisieren!! need help

    Anzeigen:
    Webhosting ab 3,99 €
    Hi

    ich kenne jetzt pure Upload nicht, zumindest habe ich es bei mir nicht installiert.
    Dort gibt es aber bestimmt auch Samples, die man nutzen und anpassen kann.
    Ansonsten muss man sich halt eine einfach Datenbankverbindung dazwischenbauen und über ADO einen Datensatz einfügen. Wird ein Datensatz geupdatet, liest man sich in der SQL-Wherebedingung die ID aus und kommentiert oRS.AddNew (im Beispiel unten) einfach weg.

    Hier mal ein Beispiel, wie man es auf einfache Weise machen kann. Dies bezieht sich allerdings auf die Komponente ASPSmartUpload und ist nicht 1 zu 1 zu übernehmen, soll nur zur Veranschaulichung dienen.

    %>
    Dim mySmartUpload
    Dim intCount

    Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

    mySmartUpload.Upload

    intCount = mySmartUpload.Save("/aspSmartUpload/Upload")

    ' --- hier wird der Datensatz in die Tabelle eingefügt

    dim objConn
    Set objConn = Server.CreateObject("ADODB.Connection")
    objConn.Open "Verbindung"

    strSQL = "SELECT filename, file, textname1, textname2 FROM TFILES"

    Set oRs = Server.CreateObject("ADODB.recordset")
    Set oRs.ActiveConnection = objConn
    oRs.Source = strSQL
    oRs.LockType = 3
    oRs.Open

    oRs.AddNew
    oRs("FILENAME") = mySmartUpload.Files("FILE1").Filename
    oRs("textname1") = mySmartUpload.Form("TEXT1").values
    oRs("textname2") = mySmartUpload.Form("TEXT2").values
    oRs.Update
    Response.write "ok"

    ' rs und Verbindung schließen!
    %>

    Ansonsten mal im Manual oder hier reinschauen

    http://www.dmxzone.com/ShowDetail.asp?NewsId=221

    Grüße

    [Edited by Gudula on 05-06-2003 at 04:15 PM GMT]
    Herzliche Grüße, Gudula
    per aspera ad astra
    Ich bin kein Klugscheißer, ich weiß es wirklich besser!

Similar Threads

  1. Bilder aktualisieren
    By sandraz in forum Serverseitige Programmierung
    Replies: 3
    Last Post: 01.07.2003, 14:25

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •