Posiblemente la única ventaja de usar .Net:
-- Un poco de más seguridad en cuanto al acceso a Base de Datos
La funcionalidad de las variables y todo el ActionScript de flash con ASP lo puedes checar en FlashMaestro, lo único adicional de este minituto es la conexión mediante ASP.Net y nada más...
Antes que nada tener instalados:
Framework .NET (SDK)
Un DBMS como MS-SQLServer 2000 (o en su defecto Access o MSDE)
Opcional: Microsoft ODBC.Net
IIS
IE v6
Usar un editor para ASP.Net (VisualStudio.Net, WebMatrix, Dreamweaver...)
(si vas a subir tu página de preferencia tener todos los ServiceParches tanto de Windows como de SQL instalados)
**IMPORTANTE: un buen firewall pa' poner un poco más de trabajo a los crackers-hackers, como todos sabemos muchos le quieren dar en la... a Microsoft y a sus derivados**
Tip:
En el archivo c:\Windows\Microsoft.Net\Framework\versionFramewor k\CONFIG\Machine.Config en la sección 'processModel Attributes' modificar el userName="SYSTEM" (que por default es "ASPNET")
Código de Pagina.aspx:
Importar NameSpaces: System.Data y System.Data.SqlClient:
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.SqlClient" %>
Borrar o quitar todos los tags de html
<Code>
Sub Page_Load(Sender As Object, E As EventArgs)
If Not (Page.IsPostBack)
Dim MyConnection As SqlConnection
Dim DS As New DataSet
Dim MyTable As DataTable
Dim myRow As DataRow
Dim numrows As Integer
MyConnection = New SqlConnection("server=(local);database=NombreBaseD eDatos;Trusted_Connection=yes")
Dim MyCommand As New SqlDataAdapter("Select * from NombreTabla", MyConnection)
MyCommand.Fill(DS, "NombreTabla")
MyTable = New DataTable
MyTable = DS.Tables(0)
numrows = MyTable.Rows.Count
If numrows = 0 then
Response.Write("<p>No existen datos registrados.</p>")
Else
Response.Write("Variable1="& server.URLEncode(MyTable.Rows(0).Item("NombreCampo 1")) & "&Variable2=" & server.URLEncode(MyTable.Rows(0).Item("Campo2")))
End if
End If
End Sub
</Code>
ActionScript de X.fla
Frame1: loadVariablesNum("Pagina.aspx", 0, "GET");
Frame2: if (Variable1 ne "") {
gotoAndPlay(X);
}
FrameX: gotoAndPlay(2);
La Variable1 y Variable2 la puedes definir con AS o con la simple TextTool