Visualizzazione dei risultati da 1 a 8 su 8
  1. #1

    Aruba: Parametri per invio Form

    Buona giornata a tutti.
    Avrei da fare una domanda:
    C'è qualcuno fra di voi che ha il dominio con Aruba?
    Bene avete i parametri per settare i form per l'invio on-line?

    grazie
    ale tacchino82

  2. #2
    Parametri? :master:

    Puoi essere più preciso?
    Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!

  3. #3
    Si scusami volevo sapere se qualcuno conosceva i parametri action tipo:
    action="http://www.xxxxxxxxxx.it/cgi-bin/mailto.exe"

    Non sono riuscito a trovarli e non so se aruba supporta l'invio di form on-line.

    In poche parole volevo far inviare il form senza usare outlook.

    grazie
    ale tacchino82

  4. #4
    NOn ti so aiutare, comunque senza usare outlook, puoi ricorrere al componente CDOSYS di Aruba.

    Non devi settare nessun paramentro (a parte impostare il codice della mail che vuoi mandare) ed il gioco è fatto.

    ESEMPIO:

    codice:
    
    <% 
    'recupero i campi della form
    strNome=trim(request.form("nome"))
    strCognome=trim(request.form("cognome"))
    strMessaggio=trim(request.form("messaggio"))
    strMessaggio=replace(strMessaggio, vbcrlf, "
    ")
    
    if (strNome <> "") AND (strCognome <> "") AND (strMessaggio <> "") then
    		on error resume next
      	    strFrom = "Intermania.it"
    		sBody = "Questa mail ti è stata inviata da "& strNome & " " & strCognome &":
    
    " 
    		sBody = sBody & strMessaggio & "[/b]
    
    " 
    		sBody = sBody & "Segnalazione del: " & now() 
    											
    		'istanzio le costanti per invio
    		DIM iMsg, Flds, iConf
    		
    		Set iMsg = CreateObject("CDO.Message")
    		Set iConf = CreateObject("CDO.Configuration")
    		Set Flds = iConf.Fields
    		
    		Flds(cdoSendUsingMethod) = cdoSendUsingPort
    		Flds(cdoSMTPServer) = "smtp.aruba.it" 
    		Flds(cdoSMTPServerPort) = 25
    		Flds(cdoSMTPAuthenticate) = cdoAnonymous ' 0
    		Flds.Update			
    
    		With iMsg
    		   Set .Configuration = iConf
    		   .To = strEmailDest
    		   .From = strFrom
    		   .Sender = strEmailMitt
    		   .Subject = "Qui metti l'oggetto"
    		   .HTMLBody = "" & sBody & ""
    		   .Send
    		End With
    		'fine nuovo			
    			
    		if err.number > 0 then
    			strOutput= "Si è verificato un errore nell'invio del codice"
    		else
    			strOutput ="Sito Segnalato correttamente!!!"
    		end if
    	
    end if	
    %>
    Questo codice, tramite il componente CDOSYS ti permette di inviare mail senza passare per outlook.
    Basta solo invocare lo stesso nella action della tua form, ovviamente adattando i campi alle tue esigenze.

    Ad esempio, crei una pagina di nome 'invia.asp' dove metti il codice di su.
    Nella tua form nella action fai:

    codice:
    <form method="post" action="invia.asp">
    
    .......i tuoi campi.....
    
    </form>
    Sono stato abbastanza chiaro?
    Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!

  5. #5
    Penso prorpio di si provo e ti faccio sapere

    grazie
    ale tacchino82

  6. #6
    Scusa un'ultima domanda io la mia mail dove la devo mettere altriemnti come fà ad arrivarmi?
    ale tacchino82

  7. #7
    Qui:

    codice:
    .To = strEmailDest
    Puoi fare in 2 modi:

    1)
    codice:
    strEmailDest = "tuamail@tin.it"
    .To = strEmailDest
    2)
    codice:
    .To = "tuamail@tin.it"
    Come preferisci.
    Provare paura per un qualcosa che ti possa capitare nel futuro non ti evita quell'evento,ti fa soltanto vivere un presente sbagliato!

  8. #8
    Sarebbe bello si potessero lanciare gli exe dalla cartella cgi-bin
    SGr33n

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.