Caricare valore da imput della pagina fuori dal form

**Dodo66** · 26-03-2009, 21:25

Ciao a tutti Sapete se è possibile inviare testi da imput posizionati nella pagina html ma fuori dasl form di invio?Cioè nel form di base carico gli indirizzi email del db e in atri tre imput text scrivo un messaggio all'invio i campi del form partono quelli fuori dal form no.Non potendo includere l messaggio nel form devo cricarne il contenuto al momento dell'invio ma non riesco a farlo

VVoVe:

posto il codice totale:

<body bgcolor="#808000">

<table border="1" width="68%" id="table3" cellpadding="0" bordercolor="#FB8213">
<form method="POST" action="letturaindirizzi.asp">
<tr>
<td valign="bottom"><font size="2">CERCA</font>
<select size="1" name="tipologiacliente">
<option>Cliente</option>
<option>Cliente/Amico</option>
<option>Cliente/Collaboratore</option>
<option>Cliente/Consulente</option>
<option>Cliente/Partner</option>
<option>Cliente/Fornitore</option>
<option>Cliente/Dipendente</option>
<option>Cliente/Potenziale</option>
<option>Cliente/Chiave</option>
</select> <input type="submit" value="Invia" name="B2">
</td></form>
<form method="POST" action="letturaindirizzi1.asp">
<td>
<font size="2">CERCA Categoria Aziendale</font>
<select size="1" name="categoriaazienda">
<option>Azienda</option>
<option>SRL</option>
<option>SpA</option>
<option>SAPA</option>
<option>Soc_Cooperative</option>
<option>SNC</option>
<option>sas</option>
<option>Soc_Semplici</option>
<option>Studi_Associati</option>
<option>Istituti_di_credito</option>
</select> <input type="submit" value="Invia" name="B3">
</td></form>
</tr>
</table>

<table border="1" width="68%" id="table2" bgcolor="#FFE888">

<tr> <form name="Modulo" method="POST" >
<td width="33%">Mittente</td>
<td width="549">

<input type="text" name="Azienda" size="57" value="Work Project"></td>
</tr>
<tr>
<td width="33%">Oggetto</td>
<td width="549">
<input type="text" name="Oggetto" size="70"></td>
</tr>
<tr>
<td width="33%">Messaggio</td>
<td width="549">
<textarea rows="2" name="Commenti" cols="66"></textarea>

</td>
</tr>
</form>
</table>

<SCRIPT Language="VBSCRIPT">

</SCRIPT>
<table border="1" width="68%" id="table2" bgcolor="#FFE555">

<form name="letturaindirizzi" method="POST" action="invio.asp" >

<input type="hidden" name="Azienda" size="57" value="document.form.Azienda.value">
<tr>
<td style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px" colspan="2" bgcolor="#FF6600" height="23">
</td>
</tr>
<tr>

<td style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px" width="96%">
Seleziona Tutti</td>

<td width="2%" align="left">

<input type="checkbox" name="allbox" value="Check All" onClick="CheckAll"></td>
</tr>
<tr>
<%@Language="VBScript"%>

<%Response.Buffer = True%>
<%
Dim status, parola, oRS

parola=request("tipologiacliente")

sdc = "driver={Microsoft Access Driver (*.mdb)};"
sdc= sdc + "dbq=" + Server.MapPath("statocliente.mdb")
set conn=Server.CreateObject("ADODB.Connection")
Set oRS = Server.CreateObject("ADODB.Recordset")

conn.ConnectionString=sdc
conn.open

strSQL="SELECT * FROM Statocliente WHERE tipologiacliente LIKE '%" & parola & "%'"

oRS.open strSQL, conn
if oRS.Eof then
response.write("Nessun Cliente Trovato")
else

WHILE NOT oRS.EOF

%>
<td style="border-left-width: 1px; border-right-width: 1px; border-top-width: 1px; border-bottom-style: solid; border-bottom-width: 1px" width="96%">
Azienda Cliente: <span style="background-color: #FF6600"> <%=oRS("Azienda")%></span>
</td>

<td width="2%" align="left">

<input type="checkbox" name="indirizzi" value="<%=oRS("email1")%>">

</td>
</tr>
<%
oRS.MoveNext
WEND
end if

%>
<tr>
<td width="96%"><input type="submit" value="Invia" name="B1" style="float: right"></td>

</td>
</tr>
</form>
</table>

Spero che qualcuno sappia darmi una indicazione

**br1** · 26-03-2009, 22:39

Forse ti riferisci a questa fantasia....

<form name="letturaindirizzi" method="POST" action="invio.asp" >
<input type="hidden" name="Azienda" size="57" value="document.form.Azienda.value">
...

Ma volevi fare una cosa simile:
<form name="letturaindirizzi" method="POST" action="invio.asp" onsubmit="this.form.Azienda.value=document.Modulo. Azienda.value">
<input type="hidden" name="Azienda" size="57" value="">

Il tutto se ho azzeccato l'argomento in base ai pochi elementi forniti

ciao

**Dodo66** · 27-03-2009, 00:05

Si so che lasciato una libera interpretazione ma così ho fatto subito vedere do vìè l'inghippo. Ho provato a utilizzare la sinassi che mi hai inviato ma nell'email il valore di Azienda non viene passato

Il problema è che se includo i tre imput del messaggio ne modulo base ho problemi co sele ziona tutti che non supporta gli elementi imput in base alla funzione chekall la tua sintassi leggendola è chiara ma non accade nulla????

**br1** · 27-03-2009, 00:19

Originariamente inviato da Dodo66
Si so che lasciato una libera interpretazione ma così ho fatto subito vedere do vìè l'inghippo. Ho provato a utilizzare la sinassi che mi hai inviato ma nell'email il valore di Azienda non viene passato

Il problema è che se includo i tre imput del messaggio ne modulo base ho problemi co sele ziona tutti che non supporta gli elementi imput in base alla funzione chekall la tua sintassi leggendola è chiara ma non accade nulla????

Eeeehhh???

**Dodo66** · 27-03-2009, 00:32

Provo a spiegarmi
leggo gli indirizzi email dal dbe li stampo a video;
ho usato una funzione VB SCRIPT per checcare tutti gli indirizzi visionati;
devo mandare un messaggio ai "clienti" e ho inserito un modulino con tre campi:Azienda,Oggetto,Commenti.
Ho visto che se il modulo è posto adi sotto del pulsante che contiene la chiamata alla funzione checkall tutto funziona anche se in anteprima con frontpage mi da un errore nel debug come se
questa funzione va in contrasto con gli imput del modulo

SUB CheckAll
for each checkbox in document.letturaindirizzi.elements
if checkbox.name <> "allbox" then
checkbox.checked = document.letturaindirizzi.allbox.checked
end if
Next

END SUB
-->
</SCRIPT>

Ma funziona.
Il mio problema si manifesta se sposto il modulo graficamente al di sopra degli indirizzi email quindi fuori dal form.
Ecco perchè sto cercando di caricare nel form letturaindirizzi il contenuto degli imput del modulo.
Spero di essere statochiarino...
Comunque il codice che mi hai postato dovrebbe funzionare ...ma non lo fa

VVoVe:

**Dodo66** · 27-03-2009, 18:12

Ho dato una ripulita alla pagina togliendo le funzioni e ho lasciato solo i due moduli il primo è un form senza pulsante con tre campi il contenuto di questi campi deve essere passato al secondo form che invia tutto ad una pagina asp.

<html>

<table border="1" width="68%" id="table2" bgcolor="#FFE888">
<form name="Modulo" method="POST" action="prova.asp" >
<tr>
<td width="33%">Mittente</td>
<td width="549">

<input type="text" name="Azienda" size="57" value="Work Project"></td>
</tr>
<tr>
<td width="33%">Oggetto</td>
<td width="549">
<input type="text" name="Oggetto" size="70"></td>
</tr>
<tr>
<td width="33%">Messaggio</td>
<td width="549">
<textarea rows="2" name="Commenti" cols="66"></textarea>

</td>
</tr>
</form>
</table>

<table border="1" width="68%" id="table2" bgcolor="#FFE555">

<form name="letturaindirizzi" method="POST" action="prova.asp" onsubmit="this.form.Azienda.value=document.Modulo. Azienda.value">

<input type="hidden" name="Azienda" size="57" value="">
<tr>

<%@Language="VBScript"%>
<%Response.Buffer = True%>
<%
Dim status, parola, oRS
parola=request("tipologiacliente")
sdc = "driver={Microsoft Access Driver (*.mdb)};"
sdc= sdc + "dbq=" + Server.MapPath("statocliente.mdb")
set conn=Server.CreateObject("ADODB.Connection")
Set oRS = Server.CreateObject("ADODB.Recordset")

conn.ConnectionString=sdc
conn.open

strSQL="SELECT * FROM Statocliente WHERE tipologiacliente LIKE '%" & parola & "%'"

oRS.open strSQL, conn
if oRS.Eof then
response.write("Nessun Cliente Trovato")
else
WHILE NOT oRS.EOF
%>
<td width="2%" align="left">
<input type="text" name="indirizzi" value="<%=oRS("email1")%>">
</td>
</tr>
<%
oRS.MoveNext
WEND
end if
%>
<tr>
<td width="96%"><input type="submit" value="Invia" name="B1" style="float: right"></td>
</td>
</tr>
</form>
</table>

</html>

ho provato gli indirizzi email vengono invaiti il contenuto del form "Modulo" no

qual'è il problema vedi un po grazie comunque per la risposta

**Dodo66** · 27-03-2009, 18:39

aL POSTO DI THIS. HO MESSO IL RIFERIMENTO AL FORM CONTENTO NEL DOCUMENTO

onsubmit="document.letturaindirizzi.Azienda.value= document.Modulo.Azienda.value"

Grazie la tua risposta è stata illuminante ora devo vedere se mi funziona nello scritto completo grazie magari ci si risente

**Dodo66** · 28-03-2009, 01:11

Tutto bene ma il mio modulo ha 3 campi di imput da passare attraverso onsubmit.
Come faccio sto provando a concatenare le istruzioni ma non ottengo risultati

onsubmit="document.letturaindirizzi.Oggetto.value= document.Modulo.Oggetto.value&document.letturaindi rizzi.Azienda.value=document.Modulo.azienda.value"
ma non peso sia la sintassi corretta mi potresti dare una dritta per favore grazie

**Dodo66** · 28-03-2009, 01:45

<SCRIPT Language="JAVASCRIPT">

</SCRIPT>
ho fatto questa funzione per caricarmi tutte le variabili nel gestore onsubmit

Grazie di tutto anche se un tuo consiglio l'avrei gradito

Discussione: Caricare valore da imput della pagina fuori dal form

Strumenti discussione

Ricerca discussione

Visualizza

Caricare valore da imput della pagina fuori dal form

Re: Caricare valore da imput della pagina fuori dal form

grazie anzitutto

Re: grazie anzitutto

non funziona

CE L'HO FATTA

Ora devo caricare 3 variabili

CE L'HO FATTA

Permessi di invio