|
Mostrar Temas
|
Páginas: 1 [2] 3
|
11
|
Programación / Scripting / [VBS] IternetExplorer.Application
|
en: 23 Julio 2011, 23:18 pm
|
Hola, estoi tratando de hacer un script para facebook, no es mas que un script de escritorio que abrirá la pagina y tomara un texfield y le dará un valor, bueno, estoi tratando de aprender sobre este objeto de a poko, he intentado lo siguiente: dim ie 'as object set ie=createobject("internetexplorer.application") ie.navigate "www.google.com" coleccion = ie.getElementsByClass("BUTTON") 'aqui me manda un error 80004005 'bla bla bla
Quería mostrar la coleccion de nombres de objetos para saber que botones tiene google y así poder manipular otras páginas. ¿Que puedo estar haciendo mal? De antemano, gracias Saludos
|
|
|
12
|
Programación / Scripting / [VBS] Excel.cells() windows 7 problema con for
|
en: 8 Julio 2011, 01:32 am
|
Hola estaba tratando de volver al scripting con vbs, volviendo a probar el viejo metodo Object.cells(x, x) me di cuenta que no se le pueden agregar variables en windows 7, ya sea por que este haciendo algo mal o que no se xD, bueno, esto es lo que intenté: set exc=createobject("excel.application") for x=0 to 99 step 1 exc.cells(1, x).value = "texto de prueba" 'aqui me salta error desconocido en tiempo de ejecucion wscript.sleep 200 exc.cells(1, x).value = "" next
De antemano, gracias Saludos
|
|
|
13
|
Programación / Java / [Threads] wait() y notify()
|
en: 14 Junio 2011, 23:43 pm
|
Buenas, me gustaria saber si existe alguna documentacion para seres humanos de como se usan los hilos en java xD, en teoria, se instancia un Thread y en el constructor se le pasa una nueva instancia de Runnable() sobreescribiendo el metodo run(), para iniciarlo se llama al metodo start(), suponiendo que el metodo run() ejecuta un bloque de codigo infinito (digamos un while(true) { ... } ) tendriamos un proceso llamado hilo que acompañaría a nuestro programa principal sin que este espere el return del metodo run(), ahora bien, si dentro de mi programa principal accedo al objeto que contiene el hilo y llamo al metodo suspend(); el metodo se detiene, si llamo a resume(); el hilo continua su ejecucion, mi gran duda es: 1) ¿Por que al llamar al Object.wait(); en vez de suspend(); no se produce la pausa, sino que espera alrededor de un segundo y continua? y (Aunque es un poko obvio, sabiendo que no se produce la pausa) 2) ¿Por que al llamar al Object.notify(); me suelta IllegalMonitorStateException, siendo que anteriormente (supuestamente) se provocó una pausa en el hilo con wait();? He buscado y he leído varias cosas pero lo uniko que consegui entender fue esto , imaginate un mono tratando de descubir para que funciona una rueda, asi me siento xD. De antemano, gracias Saludos PD: dejo un ejemplo de lo que prové (la interface grafica la hice con un ide asi que la omitire) public class hilo{ volatile int c=0; public hilo(){ init_hilo(); } public void init_hilo(){ public void run(){ while(true){ c++; } } }); } public static void main (String[] args ){ new hilo(); try{ t.wait(); t.notify(); //si uso suspend(); y resume(); no me da problemas =/ } } }
|
|
|
14
|
Programación / Java / [JARs] Como modificar un archivo que esté en un mismo jar?
|
en: 23 Mayo 2011, 06:25 am
|
Buenas, tengo el siguiente problema con los archivos.jar ¿Como podría modificar los archivos que están compresos en el mismo jar con una aplicacion en java? Por ejemplo, tengo mi archivo.class en una carpeta, en esa misma carpeta tengo una carpeta con archivos *.txt y la carpeta con el manifest, ok si compilo y ejecuto a nivel de linea de comandos puedo modificar el contenido de cualquier archivo.txt que esté en dicha carpeta, ahora bien, si comprimo y ejecuto el ejecutable.jar al tratar de trabajar con el directorio actual me toma el directorio donde está el .jar y no el directorio que está dentro del .jar, entonces mi duda es: ¿se puede trabajar con los archivos que están compresos dentro del .jar? ¿como? No quisiera llegar a tener que depender de archivos externos De antemano, gracias Saludos
|
|
|
17
|
Informática / Software / [Pedido] Vbsedit portable
|
en: 13 Abril 2011, 22:18 pm
|
Hola, he estado buscando y no he podido encontrar este programa, al menos no en su forma portable, si alguien me puede dar un link le estaría muy agradecido, sino es posible vbsedit cualquier "IDE" para vbs portable me sirve. De antemano gracias Saludos
|
|
|
18
|
Programación / Java / [Arreglos] "Array required but int found" [RESUELTO]
|
en: 12 Abril 2011, 22:59 pm
|
Hola, tengo un problema con lo siguiente: Instancié tres arreglos de la siguiente forma: int[] a = new int[9]; int[] b = new int[9]; int[] c = new int[9]; creé tres índices para los arreglos de la siguiente forma: int ia = 0, ib = 0, ic = 0; El problema es que si en c[ic] guardo un valor el compilador me suelta "Array required but int found " , no se que estoy haciendo mal, les dejo el código, de antemano gracias por sus respuestas Saludos import javax.swing.*; public class clase{ boolean ctp; int[][] vec = new int[3][3]; int[] a = new int[9]; int[] b = new int[9]; int[] c = new int[9]; int ia = 0, ib = 0, ic = 0; public clase(int ctrl){ switch(ctrl){ case 1: sub_principal(); break; case 2: sub_numeros(); break; case 3: sub_arreglos(); break; case 4: break; } } public static void Main (String[] args ){ } void sub_principal(){ ctp=true; while(ctp){ int m = Integer. parseInt(JOptionPane. showInputDialog(null, "1- Ingresar una frase para contar sus caracteres \n\n 2- Ingresar un Nombre para mostrar en minúsculas o mayúsculas \n\n 3- Volver \n\n 4- Salir")); switch(m){ case 1: JOptionPane. showMessageDialog(null, "La frase tiene " + frase. length() + " caracteres"); break; case 2: JOptionPane. showMessageDialog(null, nombre. toUpperCase()); break; case 3: ctp=false; break; case 4: new clase(4); break; } new clase(1); } } void sub_numeros(){ ctp=true; while(ctp){ int s = Integer. parseInt(JOptionPane. showInputDialog(null, "1- Ver si el numero es primo \n\n 2- Ver si el numero es perfecto \n\n 3- Calcular MCM entre dos numeros \n\n 4- Volver 5- Salir")); switch(s){ case 1: if (esPrimo(op)){ }else{ JOptionPane. showMessageDialog(null, s + "No es primo"); } break; case 2: if (esPerfecto(s)){ JOptionPane. showMessageDialog(null, s + "Es perfecto"); }else{ JOptionPane. showMessageDialog(null, s + "No es perfecto"); } break; case 3: JOptionPane. showMessageDialog(null, "Aun no implementada XD"); break; case 4: ctp=false; break; case 5: new clase(4); break; } new clase(1); } } void sub_arreglos(){ ctp=true; while(ctp){ int in = Integer. parseInt(JOptionPane. showInputDialog(null, "1- Ingresar numeros para la matriz \n\n 2- Volver \n\n 3-Salir")); switch (in){ case 1: int c=1; for (int x=0;x<3;x++){ for (int y=0;y<3;y++){ c++; if(vec[x][y]%2==0){ a[ia] = vec[x][y]; ia++; }else if (vec[x][y]%2!=0){ b[ib] = vec[x][y]; ib++; } if (vec[x][y]<0){ c[ic] = vec[x][y]; ic++; } } } for (int valor:a){ pares += "[" + Integer. toString(valor ) + "]"; } JOptionPane. showMessageDialog(null, "Los numeros pares son \n\n" + pares ); for (int valor:a){ impares += "[" + Integer. toString(valor ) + "]"; } JOptionPane. showMessageDialog(null, "Los numeros impares son \n\n" + impares ); for (int valor:a){ negativos += "[" + Integer. toString(valor ) + "]"; } JOptionPane. showMessageDialog(null, "Los numeros negativos son \n\n" + negativos ); break; case 2: ctp = false; break; case 3: new clase(4); break; } } new clase(1); } boolean esPrimo(int p){ int c; for (int x=p;x>0;x--){ if (p%x==0){ c++; } } if (c==2){ return true; }else{ return false; } } boolean esPerfecto(int p){ int res=0; for(int y=1;y<=p/2;y++){ if (p%y==0){ res = res + y; } } if (res == p) { return true; }else{ return false; } } }
|
|
|
19
|
Programación / Scripting / [VBS] Duda con Excel.application (WXP=W7?)
|
en: 7 Abril 2011, 22:39 pm
|
Hola, tengo el siguiente script, en windows xP me funka bien, en windows 7 se vuelve loko , básicamente crea una planilla de excel para un ciber café, usa excel.application para crear la primera parte de la planilla, y luego copio el resto con wscript.shell.sendkeys, uso tiempos entre las pulsaciones de teclas para que no se me caiga el script (y de paso excel, porque me ha pasado), bueno les dejo el script: set exc=createobject("excel.application") set wss=createobject("wscript.shell") exc.visible = true ' preparando el archivo set ambiente = exc.workbooks.add() wss.sendkeys "+({f11})" wscript.sleep 200 wss.sendkeys "+({f11})" wscript.sleep 200 wss.sendkeys "+({f11})" wscript.sleep 200 wss.sendkeys "+({f11})" wscript.sleep 200 'preparando la hoja PCs set fecha1 = exc.range("B2") fecha1.interior.colorindex = 28 fecha1.formula = "Ingrese fecha" fecha1.borders.colorindex = 1 set fecha2 = exc.range("C2") fecha2.interior.colorindex = 28 fecha2.borders.colorindex = 1 fecha2.formula = "01-01-2012" fecha2.select wss.sendkeys "{f2}" wss.sendkeys "{enter}" set fecha3 = exc.range("C8") fecha3.interior.colorindex = 28 fecha3.borders.colorindex = 1 fecha3.formula = "=C2+1" fecha3.select wss.sendkeys "{f2}" wss.sendkeys "{enter}" set rango1 = exc.range("C10:H10") rango1.interior.colorindex = 1 rango1.font.colorindex = 4 rango1.font.bold = true exc.range("c10").formula = "PC 1" exc.range("d10").formula = "PC 2" exc.range("e10").formula = "PC 3" exc.range("f10").formula = "PC 4" exc.range("g10").formula = "PC 5" exc.range("h10").formula = "PC 6" set rango2 = exc.range("C11:h19") rango2.interior.colorindex = 15 rango2.borders.colorindex = 1 set rangof = exc.range("C20:H20") rangof.interior.colorindex = 28 rangof.borders.colorindex = 1 rangof.select set f1 = exc.range("C20") f1.formula = "=suma(C11:C19)" f1.select wss.sendkeys "{f2}" wss.sendkeys "{enter}" wscript.sleep 666 wss.sendkeys "{up}" wss.sendkeys "^(c)" wss.sendkeys "+({right})" wss.sendkeys "+({right})" wss.sendkeys "+({right})" wss.sendkeys "+({right})" wss.sendkeys "+({right})" wss.sendkeys "{enter}" wscript.sleep 200 set total = exc.range("H22") total.formula = "=suma(C11:H19)" total.select wss.sendkeys "{f2}" wss.sendkeys "{enter}" ' ------------------------- 'copiando el cuadro al resto de la hoja set stotal = exc.range("G22") stotal.formula = "Total" set rango3 = exc.range("C8:H22") rango3.select wss.sendkeys "^(c)" dim control control=1 ' bajar 16 y pegar do for i=1 to 20 step 1 wss.sendkeys "{down}" if control = 32 then exit do end if next wss.sendkeys "^(v)" wscript.sleep 200 control = control + 1 loop exc.columns("B").entirecolumn.autofit ' eso, el resto está listo para pasar a la siguiente hoja for x=8 to 628 step 20 if x>8 then resta= x-20 exc.cells(x, 3).formula = "=C"&resta&"+1" exc.cells(x, 3).select wss.sendkeys "{f2}" wss.sendkeys "{enter}" wscript.sleep 200 end if fecha2.formula = "" next exc.range("C8").formula = "=C2" exc.range("c8").select wss.sendkeys "{f2}" wss.sendkeys "{enter}" '***************************************** '***************************************** ' SEGUNDA HOJA '***************************************** '***************************************** wss.sendkeys "^{pgdn}"
De antemano gracias por sus respuestas Saludos
|
|
|
20
|
Programación / Scripting / [Batch] Mata-Pestañas (Batch o similares)
|
en: 31 Marzo 2011, 23:02 pm
|
Hola, tenía ganas de ejecutar un archivo HTML en el momento en que se abra una pestaña en google chrome o en mozilla, ¿existe algún comando externo para DOS que cierre una pestaña en el momento que se abre/ejecuta?, ¿si no es así, existe alguna librería en vbs para esto? la idea es cerrar la página correspondiente y ejecutar un HTML, si es posible hacer esto podré empezar con mi code. De antemano gracias Saludos
|
|
|
|
|
|
|