elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Guía rápida para descarga de herramientas gratuitas de seguridad y desinfección


  Mostrar Temas
Páginas: 1 [2]
11  Programación / Desarrollo Web / Ayuda con javascript de despliegue de string. en: 9 Mayo 2010, 05:31 am
Tengo la siguiente función para cambiar una imagen y una descripción de una pagina:
asi la llamo:
<div class="numeros1" id="numero3" onmouseover="MMover('numero3');" onmouseout="MMout('numero3');"><span class="menu1"><a href="javascript:Ccontenido('<? echo $novedadtitulo[3]; ?>','<? echo $novedadtexto[3]; ?>','imagenes/<? echo $novedadimagen[3]; ?>')" class="enlacenav2">3</a></span></div>
         <div class="numeros1" id="numero2" onmouseover="MMover('numero2');" onmouseout="MMout('numero2');"><span class="menu1"><a href="javascript:Ccontenido('<? echo $novedadtitulo[2]; ?>','<? echo $novedadtexto[2]; ?>','imagenes/<? echo $novedadimagen[2]; ?>')" class="enlacenav2">2</a></span></div>
         <div class="numeros1" id="numero1" onmouseover="MMover('numero1');" onmouseout="MMout('numero1');"><span class="menu1"><a href="javascript:Ccontenido('<? echo $novedadtitulo[1]; ?>','<? echo $novedadtexto[1]; ?>','imagenes/<? echo $novedadimagen[1]; ?>')" class="enlacenav2">1</a></span></div>

y estas son mis funciones de despliegue:

function str_replace(cadena, cambia_esto, por_esto)
{
      return cadena.split(cambia_esto).join(por_esto);
}

function Ccontenido(titulo,texto,imagen)
{
   document.getElementById('centro').style.backgroundImage='url('+(imagen)+')';
   document.getElementById('contenido').nodeValue = titulo;
   document.getElementById('texto').firstChild.nodeValue = str_replace(texto,'\n','<br />');
}


Mi problema es que no me hace los saltos de linea lee y escribe el texto plano, mi duda es si esto se realiza de otra manera.
12  Programación / PHP / Duda con echo "<img .... y javascript en: 28 Diciembre 2009, 15:06 pm
estoy desarrollando una galeria de imagenes con php y javascript tengo una imagen centra la cual la despliego con el siguiente codigo:
Código:
echo "<img src='" . $galeria[1] .  "'name='centro' id='centro'  />";
esa parte corre perfecto.
luego tengo unas miniaturas de toda la galeria las cuales quiero que al hacerles click se desplieguen en la central tengo el siguiente codigo que me despliega las miniaturas pero no obstante no encuentro la manera de correr el javascript.
Código:
while($galeria2=mysql_fetch_array($galerias2))
{
                     echo "<img src='" . $galeria2[0] . "' onclick='centro.src='" . $galeria[1] . "'';  onmouseover='this.style.cursor='hand';' />";
                }
de antemano muchas gracias
13  Programación / .NET (C#, VB.NET, ASP) / ¿como almacenar el resultado de una query en una variable? en: 5 Octubre 2007, 23:25 pm
bueno la query sql es la siguiente SELECT MAX(Sales) FROM ID

Tengo el siguiente codigo pero nose como almacenar el resultador del query anterior en una variable

Public Class Form1
    Dim dt As New DataTable
    Dim da As New SqlClient.SqlDataAdapter
    Dim fila As Integer

    Private Sub btnConectar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnConectar.Click
        Dim cadena As String = "data source=WINDOWS-ERWL836\SQLEXPRESS;initial catalog=benja;integrated security=true"
        'Data source es el servidor, Catalog es la BD que usaremos
        Dim conexión As New SqlClient.SqlConnection(cadena)
        'conexión a la bases de datos SQL
        Dim cadenaSeleccion As String = "SELECT cod,nombre FROM benja ORDER BY cod"
        'Cadena de seleccion
        ' Crear un nuevo objeto del tipo DataAdapter
        da = New SqlClient.SqlDataAdapter(cadenaSeleccion, cadena)
        dt = New DataTable
        ' Llenar la tabla con los datos indicados
        da.Fill(dt)
        fila = 1 'El primer dato es el 0
        mostrarDatos(fila)
    End Sub
    Private Sub mostrarDatos(ByVal f As Integer)
        Dim dr As DataRow = dt.Rows(f)
        txtCodigo.Text = dr("cod").ToString
        txtNombre.Text = dr("Nombre").ToString
    End Sub
End Class
14  Programación / .NET (C#, VB.NET, ASP) / leer dato de sql en: 28 Agosto 2007, 23:00 pm
tengo entendido que por ejemplo con el comando  SELECT x FROM y selecciono un dato quisiera almacenar ese dato en un textbox, intente con un sqlclient.dataadapter pero no logre hacer que funcionara, haber si me podeis ayudar
15  Programación / .NET (C#, VB.NET, ASP) / Ayudita con access y visual.net en: 18 Agosto 2007, 20:13 pm
Tengo el siguiente codigo:
------------------------------------------------------------------------
Public Class connec
    Public con As OleDb.OleDbConnection
    Public da As OleDb.OleDbDataAdapter
    Public numero As Integer
    Public nombre As String
    Public Function ingresar(ByVal con As OleDb.OleDbConnection)
        con.Open()
        Dim access As String = "insert into CURSO values ('" & numero & "','" & nombre & "')"
        con.Close()
        Return (0)
    End Function
End Class
----------------------------------------------------------------------------------
Public Class Form1
    Dim cn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Administrador\Mis documentos\bd1.mdb")
    Dim objconnec As New connec
    Private Sub btningresar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btningresar.Click
        objconnec.numero = txtnum.Text
        objconnec.nombre = txtnom.Text
        objconnec.ingresar(cn)
    End Sub
End Class
---------------------------------------------------------------------------------
bueno cuando ingreso no me marca niun error , pero cuand oreviso la base de datos no ingresa nada alguen me puede ayudar...
16  Programación / .NET (C#, VB.NET, ASP) / denuevo yo con access y vb.net en: 18 Agosto 2007, 17:27 pm
Tengo el siguiente codigo:
------------------------------------------------------------------------
Public Class connec
    Public con As OleDb.OleDbConnection
    Public da As OleDb.OleDbDataAdapter
    Public numero As Integer
    Public nombre As String
    Public Function ingresar(ByVal con As OleDb.OleDbConnection)
        con.Open()
        Dim access As String = "insert into CURSO values ('" & numero & "','" & nombre & "')"
        con.Close()
        Return (0)
    End Function
End Class
----------------------------------------------------------------------------------
Public Class Form1
    Dim cn As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\Administrador\Mis documentos\bd1.mdb")
    Dim objconnec As New connec
    Private Sub btningresar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btningresar.Click
        objconnec.numero = txtnum.Text
        objconnec.nombre = txtnom.Text
        objconnec.ingresar(cn)
    End Sub
End Class
---------------------------------------------------------------------------------
bueno cuando ingreso no me marca niun error , pero cuand oreviso la base de datos no ingresa nada alguen me puede ayudar...
17  Programación / Programación Visual Basic / Duda visual con access 2000 en: 18 Agosto 2007, 07:07 am
Tengo el siguiento codigo para insertar desde visual a sql:

Public
Class libros
Public codigo As String
Public nombre As String
Public autor As String
Public Function ingresar(ByVal conn As SqlClient.SqlConnection)
conn.Open()
Dim sql As String = "Insert into libros values('" & codigo & "','" & nombre & "','" & autor & "')"
Dim mycommand As New SqlClient.SqlCommand (sql, conn)
mycommand.ExecuteNonQuery()
conn.Close()
Return (0)
End Function
End
Class
Public
Class Form1
Dim cadena As String = "data source=vld_lab1_06;initial catalog=II-4;integrated security=true"
Dim conn As New SqlClient.SqlConnection (cadena)
Dim objlibros As New libros
Private Sub TextBox3_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs ) Handles txtautor.TextChanged
End Sub
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs ) Handles MyBase.Load
End Sub
Private Sub btningresar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs ) Handles btningresar.Click
objlibros.codigo = txtcodigo.Text
objlibros.nombre = txtnombre.Text
objlibros.autor = txtautor.Text
objlibros.ingresar(conn)
End Sub
End
Class

Ahora Quisiera traspasarlo para insertar a access2000, ¿alguien me puede ayudar?

Páginas: 1 [2]
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines