<% uploadDir = "\\192.168.1.4\tesisgalicia.es\www\imagenes\ofertas\" 'uploadDir = "e:\InetPub\wwwroot\desarrollo\tesisGalicia\imagenes\ofertas\" pag = int("0" & Request.QueryString("pag")) id = Request.QueryString("ident") SQlQuery="Select * from ofertas where idoferta=" & id Set RsOfertas = ObjDbConnection.execute(SqlQuery) titulo = RsOfertas("nombre") referencia = RsOfertas("referencia") precio = RsOfertas("precio") descripcion = RsOfertas("descripcion") Dim fs Set fs = CreateObject("Scripting.FileSystemObject") If fs.FileExists(uploadDir&Id&"."&RsOfertas("extension")) Then imagen= "imagenes\ofertas\"&Id&"."&RsOfertas("extension") else imagen="imagenes\sinImagen.gif" end if %>
           
<< volver
 
<%=titulo%> Ref: <%=referencia%>
<%=left(Descripcion,30)%><%if imagen<>"" then%> <%End If%><%if len(descripcion)>30 then%><%descripcion2=Mid(Descripcion,31,len(descripcion)-30)%><%=Left(descripcion2,750)%><%if len(descripcion2)>750 then%><%=Mid(descripcion2,751,len(descripcion2)-750)%><%end if%><%end if%>
Precio: <%=PonPuntos(precio,2)%> €
<%PieOfertas%>
ESPAÑA: Alemparte Nº 29 A. Areas. 36860 Ponteareas. Pontevedra. Telf: 986 642299 / 986 660243 Fax: 986 661995 - E-mail: comercial@tesisgalicia.es
PORTUGAL: R. Sarmento Beires, 102 - 4450 - 723 Leça da Palmeira Telf: +351 22 999 60 70 Fax: +351 22 999 60 71 Movel: +351 91 929 25 49
Aviso Legal
<% Set RsOfertas=nothing %>