Temas

gente, alguien tiene idea de como poder hacer esto??

puedo abrir el xml desde flash y cree una funcion para editarlo con php pero no me anda, el codigo del flash es el siguiente;

Código [Seleccionar] Expandir

//Declara la variable "obj_xml" como un objeto XML
var envio_lv:LoadVars = new LoadVars();
var recibir_lv:LoadVars = new LoadVars();
function enviarMail() {
envio_lv.archivo = archivo_txt.text;
envio_lv.mensaje = cuerpo_txt.text;
envio_lv.sendAndLoad("email.php", recibir_lv, "POST");
//Aqui ustedes pueden cambiar de form.php a form.asp dependiendo del servidor
//que usen
}

var obj_xml:XML = new XML();
/*Esta linea es EXTREMADAMENTE necesaria
  Es la que nos permite colocar espacios entre etiquetas
  Sin ella, tendriamos que mantener completamentepegado nuestro XML
  Y se parsearia mal dentro de Flash
*/
obj_xml.ignoreWhite = true;
//Función que se ejecuta en el momento en el que Flash cargue el XML
obj_xml.onLoad = function(exito) {
//La variable exito sera "true" si se cargo bien y "false" si hubo
//algun error
if (exito) {
cuerpo_txt.text = obj_xml.firstChild.childNodes[2].firstChild.nodeValue;

} else {
//Muestra un mensaje de error en caso de que algo fallara
cuerpo_txt.text = "Error";
}
};
//Esta es la función que llama el boton
function cargarXML() {
//Invoca a la función "load" del objeto XML, pasandole por parametro
//La ruta de nuestro archivo XML
obj_xml.load(archivo_txt.text);
}



el del php es este

Código [Seleccionar] Expandir

<?php
        $cuerpo = $_POST["mensaje"];
        $archivo = $_POST["archivo"];
        $fp=fopen(texto.xml,'w');        
        fwrite($f2,"holaaaaaaaaa");            
        fclose($fp);                    
       ?>


buenas,, tengo un problema;
tengo un blog en php "wordpress" www.datainmo.com.ar/test2/
ahora este me habre el index.php hay alguna manera de q ese index me habra un swf en la misma pagina q actue como menu? sacando la imagen q esta ahi?


editado;

Ok tengo un blog en php, index.php.

ahora ese blog tiene un logo en la parte superior q es un jpg quiero poner una botonera en flash por esa imagen

hola tengo una duda hace tiempo y me estoy volviendo loco por q nose como hacerlo

tengo una base en acces la abro con adodc
cuando le pongo password desde el acces y lo trato de abrir del mismo me lo pide, lo pongo, funciona OK
ahora cuando voy a vb6 y le cargo los datos en el conection string me pone q hay un error de conexion, contraseña incorrecta
y aparte en el vb6 me pide usuario que en acces no lo hace
alguna idea o ayuda?

hola quiero saber como hacer para que al poner buscar me filtre por ejemplo
desde tal fecha hasta tal otra??

Hola tengo un txt donde hay codigo htm
es una pagina que muestra una imagen

lo que quiero hacer es tener un text en visual donde sea variable

y que abra el txt y busque lo siguiente

src="variable"

y que me la cambie por lo que este en el text del visual
se puede hacer??

como seria la sentecia para que me diga que tiene algo adentro
ejemplo
tengo un text1.text y quiero saber si tiene algo adentro o esta vacio

Código [Seleccionar] Expandir

if text1.text = como seria?

una pregunta como hago para que me diga cuantos rows hay en una columna
osea si tengo 5 columnas y tienen 30 row cada uno quiero que me diga que hay 30 row para abajo

osea que cuente una por una para abajo hasta el final y luego me de el resultado
ojala q se entienda gracias

una pregunta
como puedo hacer para llamar a un boton de otro form
osea en el form2 hay un boton q se llama buscar y al apretarlo busca
ahora quiero llamarlo desde el form1 mediante codigo pero no logro hacerlo
lo q pongo es esto

call form2.buscar
goto form2.buscar

alguna idea?

http://www.megaupload.com/?d=5ZIA5H7F

aver si pueden romperlo

pista:
Usuario Empleado (sin contraseña)

nº instalacion 787494
nº llave  87494.00

SUERTE

hola quiero saber como puedo imprimir un datagrid completo con todos los datos q tiene
muchas gracias

hola una pregunta cuando yo imprimo un form me imprime como maximo el tamaño de Maximizado pero no me alcanza para llenar la hoja, nose si me explico lo q necesitaria es alargar el form para q al imprimir me imprima por ejemplo al tamaño de una hoja A4
bueno desde ya muchas gracias

hice un programa queme tira unos errores cuando uso el progrma en otra pc pero en la mia anda perfecto ya no se que hacer ni en donde buscar para solucionarlo los errores son

"run time erorr "91" object variable or with block variable not set"

"run time error "7005" rowset not avaliable"

"run time error "9" subscript out of range"

cuando uso el debuger no me tira nada
busque en google y no encontre como solucionarlo
alguna idea??
es vb6 y uso una base de datos de acces con adodc1 y datagrid

como se puede encontrar un msgbox en un exe?
lo q quiero es q no me tire mas un msgbox cuando abro un programa hay alguna manera de hacer un jmp o algo por el estilo?

bueno comienzo a explicar
tengo un programa en el cual para regitrarse tengo q poner
nombre y codigo
despues q lo pongo el programa se tiene q cerrar para verificarlo

en algun lado lei como crackear este sistema yo no tengo idea si alguien me puede tirar alguna idea o el link de como crackear ese sistema se lo agradeceria mucho

como hago para hacer q busque unos parametros en una base de datos y me los ponga todos los q existen en un list box

osea yo pongo

Código [Seleccionar] Expandir

Private Sub BuscarSiguiente()
    Dim nReg As Long
    nReg = Val(Text8)
    If Option1.Value = True Then
        Data1.Recordset.FindNext "precio Like '" & Text8.Text & "'"
    End If
eso se coloca en un text box por ej text4.text
pero yo quiero algo asi

Código [Seleccionar] Expandir

List1.AddItem Text10.Text
y q todos los datos de "precio" vallan directo a una lista en list1

esto sirve pero nose como usarlo con lo q necesito

Código [Seleccionar] Expandir

Dim sTmp As String
List1.Clear
    On Local Error Resume Next

    sTmp = Dir$(Text1.Text)
    If Err = 0 Then
        Do While Len(sTmp)      'Repetir mientras haya ficheros
            List1.AddItem sTmp  'Lo añadimos a la lista
            sTmp = Dir$         'Asignar el siguiente fichero
        Loop
    End If
    Err = 0

End Sub

Holas queria hablar de un tema q seguramente la gran mayoria paso alguna vez tratando de hacer o haciendo
las facturas, como se hacen en VB6.0
como hacer para imprimirlas, como hacer para que te imprima lo q quieres en el lugar que quieres
bueno si alguien tiene experiencia o alguna idea en esto comentelo q somos muchos los q estamos interesados en aprender esto
por mi parte pasare el codigo de como guardar los datos y como hacer para imprimirlos al estilo picture (lo busco y lo pongo)
pero taria bueno si alguien sabe como hacer para imprimir el texto

en win 98 seria algo asi

Código [Seleccionar] Expandir


Private Declare Sub keybd_event Lib "user32" (ByVal bVk As Byte,
ByVal bScan As Byte, ByVal dwFlags As Long,
ByVal dwExtraInfo As Long)

Private Sub Command1_Click()
'Captura la ventana activa
keybd_event 44, 0, 0&, 0&
End Sub

Private Sub Command2_Click()
'Captura toda la pantalla
keybd_event 44, 1, 0&, 0&
End Sub


Pero en XP no fuinciona capturar la pantalla activa
alguna sugerncia ??

tengo un programa el cual entra a una carpeta y abre los archivos y los le la cuestion es esta son 80 archivos q se pueden hacer pero con el metodo q hice solo me abre hasta donde hay archivos x ejemplo si tengo del 1 al 11 y del 13 al 17 nunca me va a leer del 13 para ariba x q al faltar el 12 va a Fallo

me gustaria saber alguna manera para q yo no tenga q poner Open 1, open 2, open 3 y asi hasta 80 sino q el programa solo haga una lista de los archivos q hay y los abra de forma ordenada tirando los datos a la pantalla
aca les paso el codigo q tengo yo

Código [Seleccionar] Expandir


Private Sub cmd1_Click()
Dim tt As String
Dim bu
Set bu = CreateObject("Wscript.shell")
tt = bu.regread("HKEY_CURRENT_USER\Software\Microsoft\Tdf\dir")
On Error GoTo Fallo2
Open tt & 1 For Input As #5
Close #5
Open tt & 1 For Binary As #7
Get #7, 740, dato37
Get #7, 20, dato2
Close #7
l1.Caption = dato37
l2.Caption = dato2
Exit Sub
Fallo2: cmd1.Caption = "&Buscar"
Fallo: cmd1.Caption = "&Buscar"
End Sub


tengo un programa en vb6 el cual guarda unos .dat en la carpeta donde se ejecuta la aplicacion
quiero saber alguna forma para q esos .dat me los guarde en
otra carpeta q no sea esa
Gracias a todos
8)