+ Rispondi al Thread
Pagina 1 di 2 12 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 11

Discussione: [ASP]Problemi con CDO

  1. #1
    net-addiction non è in linea Scolaretto
    Luogo
    Treviso
    Post
    476

    [ASP]Problemi con CDO

    Ciao a tutti.. nessuno di voi ha mai provato a mandare mail con CDO??

    A me capitano cose strane.. tipo che si perdono per strada 3 byte alla volta.. oppure intere frasi..
    Avete idea di come si possano eitare queste perdite?
    Puo essere colpa del mio server web o del mio server SMTP?
    - The user formerly known as GRiM[R]eaPeR -

  2. #2
    Post
    4,741
    Blogs
    12
    Ciao grim,
    Scusa potresti fornire alcuni esempi, si perdono per strada in che senso ? Se magari posti anche del codice diamo un'occhiatina insieme, che dici ?

  3. #3
    net-addiction non è in linea Scolaretto
    Luogo
    Treviso
    Post
    476
    hahah... questa volta il codice non c'entra.. è perfetto
    Devo mandare una mail di conferma per l'iscrizione ad un seminario... una copia a chi si è inscritto e in copia nascosta a uno dell'azienda... sebbene il corpo della mail sia scritto in ogni dettaglio quando mi arriva la mail o mancano 3 lettere o un'intera frase..
    - The user formerly known as GRiM[R]eaPeR -

  4. #4
    Post
    4,741
    Blogs
    12
    uhm...
    Strano come problema, potrei dare comunque uno sguardo al codice interessato. Quindi, quello relativo all'invio della posta ?

    Grazie,
    Giuseppe

  5. #5
    net-addiction non è in linea Scolaretto
    Luogo
    Treviso
    Post
    476
    <%
    msg=""
    msg2=""
    Action = Left(UCase(Request("Action")),5)

    If Action = "INVIA" Then
    If Request("dati") = "" Then
    Msg2="<i>Ricorda l'autorizzazione al trattamento dei dati personali</i>"
    end if
    If Request("company") = "" OR _
    Request("lastname") = "" OR _
    Request("firstname") = "" OR _
    Request("mansione") = "" OR _
    Request("mail") = "" Then
    msg="<I>E' necessario compilare tutti i campi.</I>"
    End If

    If msg = "" and msg2="" Then
    sql = "insert into users (" &_
    "company, " &_
    "lastname, " &_
    "firstname, " &_
    "mansione, " &_
    "mail, " &_
    "g1, " &_
    "g2, " &_
    "g3, " &_
    "dati) " &_
    "VALUES ( "
    sql = sql & CheckString(Request("company"), ",")
    sql = sql & CheckString(Request("lastname"), ",")
    sql = sql & CheckString(Request("firstname"), ",")
    sql = sql & CheckString(Request("mansione"), ",")
    sql = sql & CheckString(Request("mail"), ",")
    sql = sql & CheckString(Request("g1"), ",")
    sql = sql & CheckString(Request("g2"), ",")
    sql = sql & CheckString(Request("g3"), ",")
    sql = sql & CheckString(Request("dati"), ")")
    Set Conn = Server.CreateObject("ADODB.Connection")
    Session("ConnectionString") = "dsn=users"
    Conn.Open Session("ConnectionString")
    Conn.Execute(sql)
    sql = "select max(id) from users"
    set rs = Conn.Execute(sql)
    id = CLng(rs(0))
    rs.Close
    Conn.Close
    Set myMail=CreateObject("CDO.Message")
    myMail.Subject
    xxxxxxxxx Conferma Iscrizione"
    myMail.From="xxxxxxx"
    myMail.To=request("mail")
    myMail.Bcc="xxxxxxxx"
    myMail.HTMLBody= "<table border=0 width=800> <tr><td width=200><img src=http://wwwxxxxxxxx.it/images/xxxxxxxx.gif></td> <td><center><h3><font color=#ca0226 face=verdana>Conferma Iscrizione</font></h3></center></td> </tr></table><br>"

    myMail.HTMLBody= myMail.HTMLBody & "<font color=#666666 face=verdana>Gentile " & request("firstname") & " " & request("lastname") & ", questi sono i dati che ci ha fornito: <br><br>"
    myMail.HTMLBody= myMail.HTMLBody & "<table width=100% border=0><tr bgcolor=#ca0226><td><font face=verdana color=white>Cognome</td><td><font face=verdana color=white>Nome</td><td><font face=verdana color=white>Azienda</td><td><font face=verdana color=white>Mansione</td><td><font face=verdana color=white>Mail</td></tr>"
    myMail.HTMLBody= myMail.HTMLBody & "<tr bgcolor=#eeeeee><td><font face=verdana color=#666666>" & request("lastname") & "</td><td><font face=verdana color=#666666>" & request("firstname") & "</td><td><font face=verdana color=#666666>" & request("company") & "</td><td><font face=verdana color=#666666>" & request("mansione") & "</td><td><font face=verdana color=#666666>" & request("mail") & "</td></table><br><br>e desidera partecipare ai seguenti seminari:<br>"
    if request("g1") = "Sì" Then
    myMail.HTMLBody= myMail.HTMLBody & "- VPN SSL e VideoComunicazione<br>"
    end if
    if request("g2") = "Sì" Then
    myMail.HTMLBody= myMail.HTMLBody & "- AntiSpyware e Content Filtering<br>"
    end if
    if request("g3") = "Sì" Then
    myMail.HTMLBody= myMail.HTMLBody & "- Unix Access Control e Biometria<br>"
    end if
    myMail.HTMLBody= myMail.HTMLBody & " <br><br><font color=#666666>Nel caso in cui i dati siano sbagliati o per qualsiasi altro motivo non esiti a contattarci mandando una mail a <a href=mailto:info@xxxxxxx>xxxxxxxxxxx</a> .<br><br><br>Distinti Saluti<br><br><br> "

    myMail.Send
    Response.Redirect "../ls/reg.htm"
    End If
    End If
    %>
    - The user formerly known as GRiM[R]eaPeR -

  6. #6
    net-addiction non è in linea Scolaretto
    Luogo
    Treviso
    Post
    476
    ovviamente ci sarebbero anche i parametri per il server SMTP remoto.. ma sono standard
    - The user formerly known as GRiM[R]eaPeR -

  7. #7
    weppos non è in linea Scolaretto
    Luogo
    Italy
    Post
    401
    Controlla che il contenuto in qualche modo non interferisca con il resto.

    Hai provato ad inviare una mail semplice con un destinatario ed un testo corto?
    Arriva?

  8. #8
    net-addiction non è in linea Scolaretto
    Luogo
    Treviso
    Post
    476
    Ciao weppos
    si si ... ma ho bisogno di tutti i dati :P , e poi in che senso non interferisca??
    - The user formerly known as GRiM[R]eaPeR -

  9. #9
    L'avatar di Albus!
    Albus! non è in linea Scolaretto
    Post
    120
    ciao grimreaper...
    ho un problema con lo stesso tipo di codice e spero tu mi possa aiutare
    da una maschera ho un pulsante che dovrebbe inviare la mail, prendendo alcuni dati presenti nella maschera.
    Il mio problema è legato a poter creare il corpo della mial in modo che contenga i dati presi dalla maschera, del testo generico (e fin qui ci sono), ma soprattutto un'immagine che rappresenta il logo e gli eventuali recapiti.

    inizio postando il mio codice

    With ObjEmail
    .To = Me.emailcontatto
    .OriginatorDeliveryReportRequested = True
    .ReadReceiptRequested = True
    .Subject = "oggetto della mail"
    ObjEmail.HTMLBody = "Spett.le" & Me.NomeSocietà
    ObjEmail.HTMLBody = ObjEmail.HTMLBody & "testo di prova"
    ObjEmail.HTMLBody = ObjEmail.HTMLBody & "<font color=#666666 face=verdana>Gentile"

    End With
    mi era stato detto di utilizzare HTMLBody e di scrivere in HTML ma non avevo avuto nessun risultato
    ho provato il tuo codice

    myMail.HTMLBody= myMail.HTMLBody & "<font color=#666666 face=verdana>Gentile " & request("firstname") & " " & request("lastname") & ", questi sono i dati che ci ha fornito: <br><br>"
    ma non mi funziona, quando creo la mail mi scrive

    Spett.lenomeaziendatesto di prova<font color=#666666 face=verdana>Gentile
    qualche suggerimento?
    grazie

    Ciao

  10. #10
    net-addiction non è in linea Scolaretto
    Luogo
    Treviso
    Post
    476
    Ciao,
    scusami non credo di aver capito il punto. non manda la mail o il testo viene tutto attaccato?

    PS. ma tu quando scrivi in HTML usi &lt; per fare "<"?
    - The user formerly known as GRiM[R]eaPeR -

+ Rispondi al Thread
Pagina 1 di 2 12 ultimoultimo

Discussioni simili

  1. Problemi con il service pack 2
    Da M3tRo|d nel forum Microsoft Windows
    Risposte: 1
    Ultimo Post: 07-04-2005, 21:07
  2. [OUTLOOK] Problemi con dll NAV
    Da giulippa nel forum Microsoft Office, Access, VBA
    Risposte: 1
    Ultimo Post: 11-03-2005, 17:10
  3. I miei due problemi con il DVD
    Da Radagast nel forum Microsoft Windows
    Risposte: 1
    Ultimo Post: 19-11-2003, 14:56
  4. problemi con nero
    Da matemax nel forum Microsoft Windows
    Risposte: 3
    Ultimo Post: 08-01-2003, 16:48

Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi