Tema: ID Página
Ver Mensaje Individual
  #52 (permalink)  
Antiguo 12/05/2009, 03:04
Avatar de orchating
orchating
 
Fecha de Ingreso: marzo-2009
Ubicación: Madrid
Mensajes: 92
Antigüedad: 16 años, 1 mes
Puntos: 0
Respuesta: ID Página

amigos muchas gracias por todo y por ser tan tonto y no enterarme de lo que me queriais decir, estaba muy desquiciado y no sabia ni que hacia, por fin salio

Código:
<%
idpagina = Request.QueryString("IdEspectaculo")
basedatos = Server.MapPath("/Data/bdchame.mdb")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & basedatos & ";"
Sql="SELECT * FROM GC_Espectaculos WHERE IdEspectaculo = " & idpagina
Set rs1= conn.Execute(SQL)
if not rs1.EOF Then
%>
<table border='0' cellpadding='0'>
<tr>
<td width="175"><strong>Link</strong></td>

<td width="175"><input name="Vinculo" type="text" id="Link" VALUE="<%=rs1.Fields("vinculo")%>"></td>

<td width="250"><span class="Estilo2">* Si tiene Link ponerlo con http://www </span></td>

</tr>

<tr>
<td><strong>Contacto</strong></td>

<td><input name="Contacto" type="text" id="Link3" VALUE="<%=rs1.Fields("Contacto")%>"></td>

<td><span class="Estilo2">* Email del contacto </span></td>

</tr>

<tr>

<td><strong>Fecha Inicio </strong></td>

<td>

<select name="DiaI"><%'=ComboFecha(DiaI, "d", 1, 31)%></select> /

<select name="MesI"><%'=ComboFecha(MesI, "m", 1, 12)%></select> /

<select name="AnioI"><%'=ComboFecha(AnioI, "a", 2005, Year(Date)+3)%></select>

</td>

<td><span class="Estilo2">* Cuando inicia el curso dd/mm/aaaa </span></td>

</tr>

<tr>

<td><strong>Fecha Fin</strong></td>

<td>

<select name="DiaF"><%'=ComboFecha(DiaF, "d", 1, 31)%></select> /

<select name="MesF"><%'=ComboFecha(MesF, "m", 1, 12)%></select> /

<select name="AnioF"><%'=ComboFecha(AnioF, "a", 2005, Year(Date)+3)%></select>

</td>

<td><span class="Estilo2">* Cuando finaliza dd/mm/aaaa </span></td>

</tr>

<%

'For i = 1 To IDIOMA_CANTIDAD

'If (Eval("IDIOMA_"&i&"_ACTIVO")) Then

%>

<!--<tr><td colspan="3" class="Titulo-Idioma">&nbsp;&nbsp;<%=Eval("IDIOMA_"&i&"_NOMBRE") %></td></tr>-->

<tr>

<td><strong>Ciudad</strong></td>

<td><input type="text" name="Ciudad_<%=Eval("IDIOMA_"&i&"_PREFIJO")%>" id="Lugar" VALUE="<%=rs1.Fields("Ciudad_es")%>"></td>

<td><span class="Estilo2">* La ciudad donde dara el Espectaculo</span></td>

</tr>

<tr>

<td><strong>Teatro</strong></td>

<td><input name="Lugar_<%=Eval("IDIOMA_"&i&"_PREFIJO")%>" type="text" id="Escuela" VALUE="<%=rs1.Fields("Lugar_es")%>"></td>

<td><span class="Estilo2">* Nombre del Teatro</span></td>

</tr>

<tr>

<td><strong>Nombre del Espectáculo</strong></td>

<td><input name="Espectaculo_<%=Eval("IDIOMA_"&i&"_PREFIJO")%>" type="text" id="Espectaculo" VALUE="<%=rs1.Fields("Espectaculo_es")%>"></td>

<td>&nbsp;</td>

</tr>

<%

'End If

'Next

%>

<tr>

<td><input type="submit" name="Submit" value="Agregar espectáculo" /></td>

<td>&nbsp;</td>

<td>&nbsp;</td>

</tr>

</table>
<%
end if
Set Rs = nothing
Set conn = Nothing
%>
el unico problemilla que me queda es que tengo que poner la fecha y viene en un include anterior asik nada cambiare 4 variables de nombre y listo muchas gracias por todo chicos, sois unos genios y muy simpaticos un saludo a

Alder y pcarvajal sobre todo por no mandarme a tomar por......