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” />

Nel seguente script, viene illustrata una modalità di memorizzazione dei dati in un array tramite vb.net.

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 = "mittente@email.com"
  mailObj.To = "destinatario@email.com"
  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> 

Di default tutti i server controls inseriti nelle pagine memorizzano il loro stato nella pagina (tramite la variabile __VIEWSTATE).

È necessario controllare attentamente la pesantezza della pagina, perché utilizzando diversi server controls, facilmente si finisce con l’appesantirne eccessivamente la dimensione.

Per evitare tutto ciò, basta settare la proprietà EnableViewState su False:

<asp:CheckBox id=”miaCheck” runat=”server” EnableViewState=”False” />

L’evento Page_Load() viene eseguito ogni qualvolta la pagina viene richiesta dall’utente. Per evitare questa situazione, bisogna semplicemente controllare lo stato della proprietà IsPostBack:

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

Sub Page_Load(Source As Object, E As EventArgs)

if not Page.IsPostBack then

‘Questo codice viene eseguito solo una volta

….

end if

End Sub

</script>

Per convertire una stringa in intero ci si può avvalere del metodo Parse della classe Int32:

Dim numStringa as String = “78”
Dim strNumero as Integer = Int32.Parse(numStringa)

Se usiamo dati che vengono da sorgenti non sempre attendibili prepariamoci a gestire un’eccezione dovuta alla formattazione non conforme della stringa (es. “a78”)

Supponiamo di immagazzinare in una variabile di tipo DateTime la data e l’ora corrente con una riga di codice tipo:

DateTime Adesso = DateTime.Now;

Possiamo formattare la data e l’ora contenute nella variabile “Adesso” per restituire all’utente della nostra applicazione una data in un formato leggibile ed utile. Partendo da un valore di data 04/12/2001 10.53.53, se ad esempio scriviamo:

Label1.Text = Adesso.ToString(“d”);

otteniamo: 04/12/2001. Vediamo altri casi:

Label1.Text = Adesso.ToString(“D”); –> martedì 4 dicembre 2001

Label1.Text = Adesso.ToString(“t”); –> 10.53

Label1.Text = Adesso.ToString(“m”); –> 04 12

Label1.Text = Adesso.ToString(“y”); –> dicembre 2001

È anche possibile creare delle formattazioni completamente personalizzate, si consulti a tal proposito la tabella DateTimeFormatInfo Class nella documentazione del .Net Framework