Ver Mensaje Individual
  #5 (permalink)  
Antiguo 05/02/2008, 15:18
miguelillo2
 
Fecha de Ingreso: octubre-2005
Mensajes: 180
Antigüedad: 18 años, 7 meses
Puntos: 0
Re: html en aspx desde code-behind

Hola !!
Yo uso el code behind para todas mis paginas web, debido a que es mas seguro y es mas rapido. Te pongo un ejemplo , tengo una pagina que me genera alrededor de 100 paginas (por ahorita) , en donde en base a una consulta de acuerdo al usuario y contraseña traigo el top de la pagina, que corresponde al cliente así como la descripción del cliente que uso para ponerlo en el title.

'Realizo mi conexion a la bd y extraigo en unas variables de sesion los datos que necesito


'Creación de la página desde el code behind
Código:
   Response.Write("<!DOCTYPE HTML PUBLIC '-//W3C//DTD HTML 4.0 Transitional//EN'>" & vbCrLf)
                Response.Write("<HTML>" & vbCrLf)
                Response.Write("<HEAD>" & vbCrLf)
                Response.Write("<TITLE>Sitio Informativo de " & Session("des_cliente") & "</TITLE>" & vbCrLf)
                Response.Write("<meta name='vs_defaultClientScript' content='JavaScript'>" & vbCrLf)
                Response.Write("<meta name='vs_targetSchema' content='http://schemas.microsoft.com/intellisense/ie5'>" & vbCrLf)
                Response.Write("<link href='css/styles.css' rel='stylesheet' type='text/css'>" & vbCrLf)
                Response.Write("<style type='text/css'>")
                Response.Write(".noSelecto{")
                Response.Write("COLOR:#c3c3c3;")
                Response.Write("background-image: url(images/" & Session("ima_botonInactivo") & ");")
                Response.Write("cursor:pointer;")
                Response.Write("font-weight:normal;}")
                Response.Write(".selecto{")
                Response.Write("COLOR: #ffffff;")
                Response.Write("background-image: url(images/" & Session("ima_botonActivo") & ");")
                Response.Write("cursor:pointer;")
                Response.Write("font-weight:bold;}")
                Response.Write("</style>")
                Response.Write("<script language=""JavaScript"" src=""aj.js""></script>" & vbCrLf)
                Response.Write("</HEAD>" & vbCrLf)
                Response.Write("<body bgcolor='" & Session("col_fondo") & "'>" & vbCrLf)
                Response.Write("<table width='600' align='center' border='0' cellpadding='0' cellspacing='0' bgcolor='#ffffff' >" & vbCrLf)
                Response.Write("<tr valign='top'>" & vbCrLf)
                Response.Write("<td id='top' colspan='3' >" & vbCrLf)
                'Response.Write("<div id='top'>" & vbCrLf)
                'Response.Write("</div>" & vbCrLf)
                Response.Write("</td>" & vbCrLf)
                Response.Write("</tr>" & vbCrLf)
                Response.Write("<tr>" & vbCrLf)
                Response.Write("<td id='arriba' colspan='3'>" & vbCrLf)
                'Response.Write("<div id='arriba'>" & vbCrLf)
                'Response.Write("</div>" & vbCrLf)
                Response.Write("</td>" & vbCrLf)
                Response.Write("</tr>" & vbCrLf)
                Response.Write("<tr>" & vbCrLf)
                Response.Write("<td id='menu_lat' width='130px' valign='top' >" & vbCrLf)
                'Response.Write("<div id='menu_lat'>" & vbCrLf)
                'Response.Write("</div>" & vbCrLf)
                Response.Write("</td>" & vbCrLf)
                Response.Write("<td valign=top> <table ><tr><td width=10></td>" & vbCrLf)
                Response.Write("<td id='principal' width='660' valign='top' bgcolor='#ffffff'>" & vbCrLf)
                'Response.Write("<div id='principal'>" & vbCrLf)
                'Response.Write("</div>" & vbCrLf)
                Response.Write("</td></tr></table>" & vbCrLf)
                Response.Write("</td>" & vbCrLf)
                Response.Write("<td id='herramientas' width='17%' valign='top' bgcolor='#ffffff' >" & vbCrLf)
                'Response.Write("<div id='herramientas'>" & vbCrLf)
                'Response.Write("</div>" & vbCrLf)
                Response.Write("</td>" & vbCrLf)
                Response.Write("</tr>" & vbCrLf)
                Response.Write("</table>" & vbCrLf)
                Randomize()
                ' Generate random value between 1 and 6.
                Dim value As Integer = CInt(Int((Rnd()) + 1))
                Response.Write("</body>" & vbCrLf)
                              Response.Write("</HTML>" & vbCrLf)
Como puedes ver puedes usar los datos en cualquier parte del codigo que necesites..

Espero te sirva este pequeño pedazo de codigo.

Saludos cordiales...
__________________
El conocimiento se alimenta de la repeticion y la consistencia!!! (Miguel--in-- 1983---....)