Notifikationer

Markér alle som læst Log ud

c-lund Nybegynder

04. juni 2003 - 13:29 Der er 3 kommentarer og
1 løsning

Asp smart upload

Hej jeg skal bruge et script der kan uploade nogle billeder og noget teskt til en database, ved hjælp af asp smart upload.
og et link til smart upload website

håber i kan hjælpe

Synes godt om

c-lund Nybegynder

04. juni 2003 - 13:31 #1

jeg skal også bruge en eller anden form for mail script så brugere kan maile fra siden.
mvh.
C. Lund

Synes godt om

eagleeye Praktikant

04. juni 2003 - 13:45 #2

ASPSmartUpload:
http://www.aspsmart.com/aspSmartUpload/

Du kan finde flere eks på kode på deres side.:
http://www.aspsmart.com/scripts/aspSmartUpload/publigen/content/templates/show.asp?P=258&L=EN
Så kan du måske finde det eks som passer bedst til dit formål.

Andre eks på scripts kan findes her på eksperten.:
http://www.eksperten.dk/kat/3?searchtype=txt&words=ASPSmartupload&method=and&sort=time&catid=3

Mail script, hvilken mail kompunent har du adgagn til?
JMail,ASPmail,ASPEmail, ????

Synes godt om

c-lund Nybegynder

04. juni 2003 - 13:50 #3

jmail og aspmail

Synes godt om

c-lund Nybegynder

04. juni 2003 - 14:22 #4

jeg har ni brugt det her script, men hvordan for jeg vist billeder der er på en anden side.

<HTML>
<BODY BGCOLOR="white">

<H1>aspSmartUpload : Sample 4</H1>
<HR>

<%
' Variables
' *********
Dim mySmartUpload
Dim file
Dim oConn
Dim strSQL
Dim oRs
Dim intCount
intCount=0

' Object creation
' ***************
Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

' Upload
' ******
mySmartUpload.Upload

' Connect to the DB
' *****************
Set oConn = Server.CreateObject("ADODB.Connection")
curDir = Server.MapPath("Sample.mdb")
oConn.Open "DBQ="& curDir &";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;"

' Open a recordset
' ****************
strSQL = "SELECT FILENAME,FILE FROM TFILES"

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

' Select each file
' ****************
For each file In mySmartUpload.Files
' Only if the file exist
' **********************
If not file.IsMissing Then

' Add the current file in a DB field
' **********************************
oRs.AddNew
file.FileToField oRs.Fields("FILE")
oRs("FILENAME") = file.FileName
oRs.Update
intCount = intCount + 1
End If
Next

' Display the number of files uploaded
' ************************************
Response.Write(intCount & " file(s) uploaded.<BR>")

' Destruction
' ***********
oRs.Close
oConn.Close
Set oRs = Nothing
Set oConn = Nothing
%>
</BODY>
</HTML>

Synes godt om

Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Følg dette spørgsmål

Opret Preview

Programmeringssprog kurser

Kurser inden for grundlæggende programmering

Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP	10	25/06/202622:20	04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP	4	18/05/202601:57	19/05/202613:33
Lost focus Af bsn i ASP	1	07/11/202415:34	01/01/202514:58
ASP classic Af bsn i ASP	8	28/10/202423:11	30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS