Solved

Default value of file field

Posted on 2008-10-08
4
181 Views
Last Modified: 2012-06-27
Hey Experts!!
I have an update page that has 4 fields that I wish to have populated with the value.  The problem is these are file fields and their default value will not populate so that when updating the images stay the same.  
I need a solution for this please.  I do not want to take the fields out of the form, but I do need to keep the images the same if they are not being updated.  I hope I explained that correctly
0
Comment
Question by:LZ1
  • 2
  • 2
4 Comments
 
LVL 12

Expert Comment

by:R_Harrison
ID: 22677563
On the page that does the updating you should check if a file has been submitted, if not do not update the field.  The exact command may vary depending on what you are using to upload but is usually something like... (this is for ABCUpload4)

if thefield.fileexists then .....  update the database as a file has been supplied

It is not possible to set default values for File fields as the would pose a major security problem as you could specify any file to be uploaded off a 'vistors' computer!!!
 
0
 
LVL 30

Author Comment

by:LZ1
ID: 22706143
Sorry it's taken so long to get back to you, but do you have a script or code sample I may be able to use?  Or have a place where I can find one?
0
 
LVL 12

Accepted Solution

by:
R_Harrison earned 500 total points
ID: 22706471
The below should work if you enter the details where marked in CAPS.

This will only update if a file was uploaded, otherwise it will leave the database untouched.
Set theForm = Server.CreateObject("ABCUpload4.XForm")

Set theField = theForm("NAME-OF-YOUR-FILE-FIELD")(1)

REM ---- CHECK IF A FILE WAS UPLOADED ------------------

If theField.FileExists Then

    Set Conn = Server.CreateObject("ADODB.Connection")

    YOUR DATABASE CONNECTION GOES HERE

    Set rs = Server.CreateObject("ADODB.Recordset")

    rs.open "THE-TABLE-TO-UPDATE", Conn, 1, 2

    rs.filter = "A-DATABASE-FIELD=SOMETHING"

    rs("NAME-OF-FIELD-IN-DBASE").Value = theField.Data

    rs.Update

    rs.Close

    Conn.Close

End IF

Open in new window

0
 
LVL 30

Author Closing Comment

by:LZ1
ID: 31504531
Thanks again!  After a little tweaking, it worked fine.
0

Featured Post

Highfive + Dolby Voice = No More Audio Complaints!

Poor audio quality is one of the top reasons people don’t use video conferencing. Get the crispest, clearest audio powered by Dolby Voice in every meeting. Highfive and Dolby Voice deliver the best video conferencing and audio experience for every meeting and every room.

Join & Write a Comment

Suggested Solutions

I have helped a lot of people on EE with their coding sources and have enjoyed near about every minute of it. Sometimes it can get a little tedious but it is always a challenge and the one thing that I always say is:  The Exchange of information …
Have you ever needed to get an ASP script to wait for a while? I have, just to let something else happen. Or in my case, to allow other stuff to happen while I was murdering my MySQL database with an update. The Original Issue This was written…
It is a freely distributed piece of software for such tasks as photo retouching, image composition and image authoring. It works on many operating systems, in many languages.
This video explains how to create simple products associated to Magento configurable product and offers fast way of their generation with Store Manager for Magento tool.

743 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

12 Experts available now in Live!

Get 1:1 Help Now