<iframe frameborder="0" id="PTC" style="width: 582px; height: 454px;" src="http://www.banxico.org.mx/tipcamb/llenarTiposCambioAction.do?idioma=sp" scrolling="no"></iframe>
 

<script language ="javascript" type ="text/javascript">
function $(id){return document.getElementById(id);}
var guardar;
function buscar(p){
var ifr=$('ifra').contentDocument || $('ifra').contentWindow.document;
ifr.body.innerHTML=guardar;
var c=ifr.body.innerHTML;
var ini=c.indexOf(p);
var b=c.substring(0,ini);
var d=c.substr(ini+p.length);
ifr.body.innerHTML=b+'<span id="'+p+'" style="background-color: #CCC; color:#F00">'+p+'</span>'+d;
var offsetTrail = ifr.getElementById(p);
var offsetLeft = 0;
var offsetTop = 0;
while (offsetTrail) {
offsetLeft += offsetTrail.offsetLeft;
offsetTop += offsetTrail.offsetTop;
offsetTrail = offsetTrail.offsetParent;
}
if (navigator.userAgent.indexOf("Mac") != -1 && typeof ifr.body.leftMargin != "undefined" && navigator.appName=="Microsoft Internet Explorer" ) {
offsetLeft += parseInt(ifr.body.leftMargin);
offsetTop += parseInt(ifr.body.topMargin);
}
window.frames['ifra'].scrollTo(offsetLeft,offsetTop);
}
 
</script>
 

Public Sub ConexionMySQL()
        Try
 
            If CellDBCon.State = ConnectionState.Closed Then
 
                CellDBCon.ConnectionString = "Server=" & Trim(pStrServer) & "; port=" & Trim(pStrPort) & "; Uid=" & Trim(pStrUser) & "; Pwd=" & Trim(pStrPW) & "; database=" & Trim(pStrDB) & ";"
                CellDBCon.Open()
 
            End If
        Catch ex As Exception
 
        End Try
 
        MsgBox("Error al establecer la conmexion con el Servidor de Base de Datos" & vbCrLf & Err.Description)
    End Sub
 

 Dim item As ListViewItem
        Dim cmd As New MySqlCommand
        Dim reader As MySqlDataReader
 
        CerrarConexion()
        ConexionMySQL()
        Try
            cmd.Connection = CellDBCon
            cmd.CommandText = "SELECT * from horarios"
            reader = cmd.ExecuteReader
            lstLista.Items.Clear()
            While reader.Read
 
                item = lstLista.Items.Add(reader(0).ToString)
                item.SubItems.Add(reader(1).ToString)
 
 
            End While
        Catch ex As MySqlException
            MsgBox("Error: " & ex.Message & vbNewLine, MsgBoxStyle.Exclamation)
        End Try
        CerrarConexion()
 

Sub DownloadFile(ByVal virtualPath As String)
        ' retrieve the physical path of the file to download, and create
        ' a FileInfo object to read its properties
        Dim FilePath As String = Server.MapPath(virtualPath)
        Dim TargetFile As New System.IO.FileInfo(FilePath)
 
        ' clear the current output content from the buffer
        Response.Clear()
        ' add the header that specifies the default filename for the Download/
        ' SaveAs dialog
        Response.AddHeader("Content-Disposition", "attachment; filename=" + _
         TargetFile.Name)
        ' add the header that specifies the file size, so that the browser
        ' can show the download progress
        Response.AddHeader("Content-Length", TargetFile.Length.ToString())
        ' specify that the response is a stream that cannot be read by the
        ' client and must be downloaded
        Response.ContentType = "application/octet-stream"
        ' send the file stream to the client
        Response.WriteFile(TargetFile.FullName)
        ' stop the execution of this page
        Response.End()
    End Sub
 
+---------------------------------------------------------------+
Lo que quiero lograr es que usuarios de mi sitio asp.net, puedan descargar archivos, pero hasta ahorita, ese codigo
funciona del lado del servidor, cuando publico el sitio y lo intento, se descarga el archivo pero con contenido
del front de la pagina donde hago click para descargar, o bien con caracteres raros.
 
Alguien sabe a que se debe que no me funcione del lado del cliente?
 
Gracias por sus comentarios.