Ho una FORM in una pagina ASP, dove è presente un CAMPO DI TESTO nel quale inserisco il nome di una immagine tipo: "miaimage.jpg", questa è presente in una cartella del server \image\miaimage.jpg.
Adesso vorrei anzichè andare ad inserirla manualmente, aggiungere un tasto tipo sfoglia, im modo che mi faccia vedere la cartella \image sul server così da vedere tutte le immagini presenti nella cartella ed inserire così nella casella di testo il nome del file.
Sapreste aiutarmi in merito....Grazie.
Errare è umano, Perseverare è Diabolico.
sapiente è colui ke sa di non sapere.
Tempo fa ho trovato questo script che potrebbe fare al caso tuo:
pagina con il form: get.html
pagina di lettura cartella: image.aspcodice:<html><head> <title>popup</title> </head> <SCRIPT language="Javascript"> function popup(url) { Selname = window.open(url,"Ziel","toolbar=0,status=1,menubar=0,scrollbars=0,resizable=1,width=500,height=500") Selname.focus(); } </SCRIPT> <body> <form name="bild" action="test.htm" method="POST"> <input type=text name="bildname" size="35"> <a href="javascript:onClick=popup('image.asp');"> [img]icon/view.jpg[/img]</a> </form> </body> </html>
Dalla rigacodice:<%@Language=VBScript%> <%Option Explicit%> <html><head> <title>getimage</title> </head> <SCRIPT language="Javascript"> function getname (bildname) { window.opener.document.bild.bildname.value +=bildname; window.close(); } </SCRIPT> <body bgcolor="#f0f0f0"> <% Dim fs,f,name,x,pagesize,currentpage,currentpos,folder,ScriptName,filecount pagesize=20 currentPage = Request("page") if currentPage = vbNullString then currentPage=0 else currentPage=CLng(currentPage) end if currentPos=0 ScriptName = Request.ServerVariables("SCRIPT_NAME") folder = server.mappath("image/") Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.GetFolder(folder) set name = f.files filecount = name.Count %> <table width="80%" bgcolor="#000000" cellspacing="0" cellpadding="0" border="0" align="center"> <TR><TD> <table width="100%" border="0" cellspacing="1" cellpadding="3"> <TR><TD bgcolor="#FFFFFF"> <% For Each x in name if currentPos>=currentPage*Pagesize then %> ')">[img]image/<%=x.Name%>[/img]" height="50"> <% end if currentPos=currentPos+1 if currentPos>=currentPage*Pagesize+PageSize then Exit for End If Next %> </td></TR> </TABLE> </td></tr> </table> <table border="0" width="80%" align="center"> <tr><td><p align="center"> <% If Not CurrentPage = 0 Then Response.Write "Prev | " Else Response.Write "Prev | " End If If Not filecount = CurrentPos Then Response.Write "Next" Else Response.Write "Next" End If %> </TD></TR> </table> </body> </html>
folder = server.mappath("image/")
puoi settare il percorso delle immagini
Spero sia quello che volevi.
Ti ringrazio per la tua risposta...ho provato lo script della pagina image.asp, ma quello che serve a me non è visualizzare il contenuto della cartella...bensì dovrei implemantare un sistema del genere:
<input type"file"....che mi apre una finestra dove posso sfogliare le cartelle presenti sul mio pc....ma la cosa simile dovrei farla però sul server...non so se mi sono spiegato. :master:
Errare è umano, Perseverare è Diabolico.
sapiente è colui ke sa di non sapere.
devi fare un mescolone col javascript
javascript: apri un popup passando in parametro la cartella iniziale
ASP: visualizza il conenuto della cartella
javascriptremendo il bottone riempi il campo della finestra "padre" e chiude il popup
Ok, è molto lungo avere magari un esempiuccio? come si fa? Grazie.
Errare è umano, Perseverare è Diabolico.
sapiente è colui ke sa di non sapere.
ce n'è + di uno!Originariamente inviato da p73
Ok, è molto lungo avere magari un esempiuccio?
sul forum javascript
Si ma cosa dovrei cercare? Sotto la voce popup o cosa...se cerco popup di sicuro non troverò mai quello che mi serve. Grazie cmq
Errare è umano, Perseverare è Diabolico.
sapiente è colui ke sa di non sapere.
Allora ci sono vicino...
FORM.asp
------------------------------------------------------------------------------------
<input type="text" size=30 name= "PFoto" value="<%=PFoto%>" maxlength=250>
<script language="javascript">
<!--
function Sfoglia() {
var w = 500;
var h = 500;
var pw = Math.floor((screen.width-w)/2);
var ph = Math.floor((screen.height-h)/2);
window.open("image.asp","","width=" + w + ",height=" + h + ",top=" + ph + ",left=" + pw);
}
//-->
</script>
Sfoglia
------------------------------------------------------------------------------------
Quindi con la funzione javascript 'Sfoglia', mi apro la popup:
IMAGE.asp
------------------------------------------------------------------------------------
<%@Language=VBScript%>
<%Option Explicit%>
<html><head>
<title>getimage</title>
</head>
<SCRIPT language="Javascript">
function getname (bildname)
{
window.opener.document.bild.bildname.value +=bildname;
window.close();
}
</SCRIPT>
<body bgcolor="#f0f0f0">
<%
Dim fs,f,name,x,pagesize,currentpage,currentpos,folder ,ScriptName,filecount
pagesize=20
currentPage = Request("page")
if currentPage = vbNullString then
currentPage=0
else
currentPage=CLng(currentPage)
end if
currentPos=0
ScriptName = Request.ServerVariables("SCRIPT_NAME")
folder = server.mappath("\prodotti")
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(folder)
set name = f.files
filecount = name.Count
%>
<table width="80%" bgcolor="#000000" cellspacing="0" cellpadding="0" border="0" align="center">
<TR><TD>
<table width="100%" border="0" cellspacing="1" cellpadding="3">
<TR><TD bgcolor="#FFFFFF">
<%
For Each x in name
if currentPos>=currentPage*Pagesize then
%>
')">[img]icon/<%=x.Name%>[/img]" height="50">
<%
end if
currentPos=currentPos+1
if currentPos>=currentPage*Pagesize+PageSize then
Exit for
End If
Next
%>
</td></TR>
</TABLE>
</td></tr>
</table>
<table border="0" width="80%" align="center">
<tr><td><p align="center">
<%
If Not CurrentPage = 0 Then
Response.Write "Prev | "
Else
Response.Write "Prev | "
End If
If Not filecount = CurrentPos Then
Response.Write "Next"
Else
Response.Write "Next"
End If
%>
</TD></TR>
</table>
</body>
</html>
------------------------------------------------------------------------------------
...quindi la popup image.asp mi visualizza tutti i file contenuti nella cartella su server.....
adesso viene il bello...come faccio a passare la stringa del nome del file scelto nella casella di testo della form padre?????
Errare è umano, Perseverare è Diabolico.
sapiente è colui ke sa di non sapere.
Penso che la riga da cambiare sia:
------------------------------------------------------------------------------------------
')">[img]..\prodotti/<%=x.Name%>[/img]" height="50">
------------------------------------------------------------------------------------------
in quanto così mi visualizza l'immagine sulla quale clicco.
Ma io vorrei che mi inviasse il nome del file, sul quale clicco, alla casella di testo presente nella form...in questo caso la variabile della casella di testo in FORM.asp è <%=PFoto%>.
Aiutatemi per favore...
Errare è umano, Perseverare è Diabolico.
sapiente è colui ke sa di non sapere.
non sapendo (e non volendo leggere) cosa fa la funzione getName, in javascript si dovrebbe fare una cosa del tipo:
e cmq le iterazioni tra finestre sono di javascript, non di asp...chiedi li che sono + precisi...basta che te al posto di mio_valore ci metti il valore correttocodice:Imposta
Permessi di invio
Rispondi quotando