Grazie al seguente script, è possibile mostrare l’indirizzo IP del visitatore.

<%@ Page language=”vb”%>

<script runat=”server”>

Sub page_load( obj As object, e As EventArgs )

indirizzo.text=request.servervariables(“REMOTE_ADDR”)

End sub

</script>

<asp:label id=”indirizzo” value=”” runat=”server” />

Il seguente script, mostra come utilizzare le immagini facendo interagire VB.NET con l’html.

<%@page language=”vb” debug=”true”%>

<script runat=”server”>

Sub page_load(obj As object, e As EventArgs )

immagine.src =”immagine.jpg”

End sub

</script>

<img id=”immagine” runat=”server” />

Grazie al seguente script e l’utilizzo dei cookies, è possibile realizzare l’operazione di log-on in automatico. Serve però una precedente identificazione.

<%@ Page language=”vb” %>

<script runat=”server”>

Sub Page_load( obj As Object , e As EventArgs )

On Error Resume next

Dim strNome

strNome=request.cookies(“www.innovatel.it”)(“username”)

strNome=trim(strNome)

Dim strCode

strCode=request.cookies(“www.innovatel.it”)(“usercode”)

strCode=trim(strCode)

If ( (strNome=”Admin”)AND(strCode=”Code”) ) then

verifica.text=”Accesso consentito all’amministratore.”

Else

verifica.text=”Accesso non riconosciuto.”

End if

End sub

</script>

<asp:Label id=”verifica” Value=”” runat=”server” />

Ecco un semplice esempio di codice VB.NET per inviare una email utilizzando l’SMTP del server su cui poggiano le pagine ASP.NET:

<%@page language="VB" %>
<%@Import Namespace="System.Web.Util" %>

<script language="VB" runat="server">

Sub inviaEmail(Obj As Object, E As EventArgs)
  ' Crea l'oggetto MailMessage
  Dim mailObj AS new MailMessage

  ' Imposta i parametri
  mailObj.From = "[email protected]"
  mailObj.To = "[email protected]"
  mailObj.Subject = "soggetto della mail"
  mailObj.Body = "testo della mail"

  ' E-Mail in formato HTML 
  mailObj.BodyFormat = MailFormat.Html

  ' Invia la mail
  SmtpMail.Send(mailObj)
End Sub

</script>