Nessun risultato. Prova con un altro termine.
Guide
Notizie
Software
Tutorial

Link casuali

Visualizzare link casuali da una lista in una pagina Web.

<%@ Page language="VB" %>
<script runat="server">
Sub page_load( obj As object, e As EventArgs)
Dim strLink As String
strLink = ""
Dim intCasuale As Integer
intCasuale = (5-1)*Rnd + 1
intCasuale = cint( intCasuale )
Select Case intCasuale
Case 1:
strLink = "http://www.innovatel.it"
Case 2:
strLink = "http://www.html.it"
Case 3:
strLink = "http://www.flash5.it"
Case 4:
strLink = "http://www.gifanimate.it"
Case 5:
strLink = "http://www.freeasp.it"
End Select
myLink.NavigateUrl = strLink
End sub
</script>
<asp:hyperlink id="myLink" runat="server">
Link Casuale
</asp:hyperlink>

Visualizzare link casuali da una lista in una pagina Web.

<%@ Page language="VB" %>
<script runat="server">
Sub page_load( obj As object, e As EventArgs)
Dim strLink As String
strLink = ""
Dim intCasuale As Integer
intCasuale = (5-1)*Rnd + 1
intCasuale = cint( intCasuale )
Select Case intCasuale
Case 1:
strLink = "http://www.innovatel.it"
Case 2:
strLink = "http://www.html.it"
Case 3:
strLink = "http://www.flash5.it"
Case 4:
strLink = "http://www.gifanimate.it"
Case 5:
strLink = "http://www.freeasp.it"
End Select
myLink.NavigateUrl = strLink
End sub
</script>
<asp:hyperlink id="myLink" runat="server">
Link Casuale
</asp:hyperlink>

Link copiato negli appunti

Visualizzare link casuali da una lista in una pagina Web.

<%@ Page language="VB" %>

<script runat="server">

Sub page_load( obj As object, e As EventArgs)

Dim strLink As String

strLink = ""

Dim intCasuale As Integer

intCasuale = (5-1)*Rnd + 1

intCasuale = cint( intCasuale )

Select Case intCasuale

Case 1:

strLink = "http://www.innovatel.it"

Case 2:

strLink = "http://www.html.it"

Case 3:

strLink = "http://www.flash5.it"

Case 4:

strLink = "http://www.gifanimate.it"

Case 5:

strLink = "http://www.freeasp.it"

End Select

myLink.NavigateUrl = strLink

End sub

</script>

<asp:hyperlink id="myLink" runat="server">

Link Casuale

</asp:hyperlink>