Non è chiaro: intendi come una moderazione?

Qual è il problema?

questo è lo script

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, "<", "&lt;"), vbCrLf, "<br>"), "'", "''")
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

si infatti.. questo è il modulo per il commento.. ora vorrei inserire l'invio delle risposte alle 10 email.. la classica email che si riceve tipo

"l'utente tizio ha risposto al tale commente" per leggere vai a.. "

una cosa del genere..