buongirno ragazzi,
volevo chiedere ho il classico "commenta l'articolo" in una pagina asp.net, vorrei fare in modo pero' che oltre a video il commento venga inviato a 10 email cosi che tutti possano sapere che è stato fatto un commento..
questo è lo script, spero di essere stato chiaro e ringrazio in anticipo:
codice:Private cn As New ADODB.Connection Private rs As New ADODB.Recordset Private Sub Page_Load(sender As Object, e As EventArgs) cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" _ & Server.MapPath("~/app_data/database2.mdb")) rs.Open("SELECT * FROM guestbook ORDER BY id DESC", cn, 1) cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" _ & Server.MapPath("~/app_data/risultati2010.mdb")) rs.Open("SELECT * FROM risultati ORDER BY id DESC", cn, 2) rs.Close() cn.Close() End Sub Private Sub Firma(sender As Object, e As EventArgs) Dim re As New Regex("") Dim nome As String = Replace(txtNome.Text, "'", "''") Dim messaggio As String messaggio = Replace( _ Replace( _ Replace( _ txtMessaggio.Text, "<", "<"), vbCrLf, " "), "'", "''") If Len(Trim(nome)) = 0 Then Messaggi.Text = "Inserisci il tuo nome" Exit Sub End If If Len(Trim(messaggio)) = 0 Then Messaggi.Text = "Inserisci il messaggio" Exit Sub End If Dim url As String = Request.QueryString("gior") Dim data As String = FormatDateTime(Now(), 1) Dim id As String = Request.QueryString("id") Dim SQL As String = "" SQL += "INSERT INTO guestbook " SQL += "(nome, messaggio, data, id, url) " SQL += "VALUES " SQL += "('" & nome & "', " SQL += "'" & data & "', " SQL += "'" & messaggio & "', " SQL += "'" & id & "', " SQL += "'" & url & "')" cn.Open("driver={Microsoft Access Driver (*.mdb)};dbq=" _ & Server.MapPath("~/app_data/database2.mdb")) cn.Execute(SQL) cn.Close() Response.Redirect("default.aspx?id=" & Request.QueryString("id") & "&gior=" & Request.QueryString("gior") & "&squadraa=" & Request.QueryString("squadraa") & "&squadrab=" & Request.QueryString("squadrab")) End Sub

Rispondi quotando