Cita:
Iniciado por emprear Para abrir un pdf en Windows, necesitas un plugin, como el AdobeReader, lo único que te faltaría es abrirlo en el navegador, aqui algunas variantes
Código HTML:
Ver original<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml"> <meta http-equiv="content-type" content="text/html; charset=utf-8" /> <object type="application/pdf" data="file:///I:/Mis-doc-11/facturacion-abril.pdf" width="900" height="500"> <param name="src" value="file:///I:/Mis-doc-11/facturacion-abril.pdf" /> <p style="text-align:center; width: 60%;">Adobe Reader no se encuentra o la versión no es compatible, utiliza el icono para ir a la página de descarga
<br /> <a href="http://get.adobe.com/es/reader/" onclick="this.target='_blank'"> <img src="reader_icon_special.jpg" alt="Descargar Adobe Reader" width="32" height="32" style="border: none;" /></a>
<a href="file:///I:/Mis-doc-11/facturacion-abril.pdf" target="_blank">Abrir documento nueva ventana
</a> <br /> <a href="#" onclick="window.open('file:///I:/Mis-doc-11/facturacion-abril.pdf','nventana', 'width=500,height=500'); return false;">Abrir documento popup
</a>
advertí que para que funcione correctamente en todos los navegadores tenés que usar el protocolo file:///, asi que tendrás que hacer la conversión con el ASP, pero lamentablemente no manejo ASP
Saludos
muchas gracias mira aqui te va mi codigo
html
Código HTML:
<HTML>
<BODY>
<center><b><font color="black">BUSQUEDA DE CHF'S</b></center>
<form method="post" action="buscar15.asp">
<center><b><font color="black">No. de Serie:</font>
<input type="text" name="busqueda" /> <p /></b></center>
<center><input type="submit" value="Buscar"></center>
</form>
<BR>
<BR>
<HR width=50% align="right">
</BODY>
</HTML>
y mi asp de busqueda es este
Código PHP:
<%
Dim fso, dato
dato = Request.Form("busqueda")
Set fso = server.CreateObject("Scripting.FileSystemObject")
if dato = "" then
Response.Write ("<center><b><big>No se ingreso dato a buscar</big></b></center>")
else
Set objFSO = CreateObject("Scripting.FileSystemObject")
objStartFolder = "C:\inetpub\wwwroot\cummins\CHFS\"
ShowSubfolders objFSO.GetFolder(objStartFolder)
Sub ShowSubFolders(Folder)
For Each Subfolder in Folder.SubFolders
'response.write "<br>"&Subfolder.Path&"<br>"&"<br>"
Set objFolder = objFSO.GetFolder(Subfolder.Path)
Set colFiles = objFolder.Files
For Each objFile in colFiles
if dato & ".pdf" = objFile.Name then
'response.write("<a href="<=objFolder.Path><objFile.Name>"><=objFile.Name></a>);
response.write "hola"
response.write Subfolder.Path &"\"& objFile &"<br>"
'Response.Redirect(objFile)
'else response.Write ("el documento "& dato & " no existe<br>")
end if
' response.write objFile.Name &"<br>"
Next
ShowSubFolders Subfolder
Next
End Sub
end if
%>
espero me puedas ayudar