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"> <%=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> </td>
</tr>
<%
'End If
'Next
%>
<tr>
<td><input type="submit" name="Submit" value="Agregar espectáculo" /></td>
<td> </td>
<td> </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......