• Martes 28 de Septiembre de 2021, 21:30

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - - RIKI -

Páginas: [1]
1
Visual Basic 6.0 e inferiores / Payloads Y Scripts
« en: Sábado 12 de Abril de 2008, 21:58 »
Hola gente bueno tengo 2 dudas que no se resolver la pi¡rimera es como puedo hacer PAYLOAD en un VBS,me lo explicaron una vez pero no me quedo mu calro, y la seguna pregunta es como puedo crear un archivo VBS que cuando se ejecute genre otro archivo VBS con instrucciones diferentes,mas que nada por que si pono este codigo:


[CODE]


Set fso = CreateObject("Scripting.FileSystemObject")
Set var = fso.CreateTextFile("c:\ArchivoPrueba.txt", True)
var.write("Este es el contenido del archivo")
var.close


Si en Archivodeprueba.txt le canbio el txt por vbs i despues en Este es el contenido del archvi por ejemplo pongo:  
set mensaje =msgbox("hola mundo",0,"tritulo")

el codigo finalmente quedaria aisn:

Set fso = CreateObject("Scripting.FileSystemObject")
Set var = fso.CreateTextFile("c:\ArchivoPrueba.VBS", True)
var.write("set mensaje =msgbox("hola mundo",0,"tritulo")")
var.close

Pues esto sesupone que me tendria k generar un archivo VBS que cuando se ejecute me tendria k salir el mensaje i en canvio no em sale lo uniko k me sale es un maldito erro que me dice se esperava esto ')'


ya e probado de substituir las " en ' pero no me funciono



ayuda porfavor   :(

2
Visual Basic 6.0 e inferiores / Vbs (visual Basic Scripting)
« en: Viernes 4 de Abril de 2008, 23:19 »
Hola a todos los programadores de VB,VBS ect ect...Solo una duda k tengo me pasaron el codigo de un VBS k lo k acia es abrir la tapa del CD rom del pc y apartir de eso me pregunte si es posible controlar parte o algo de cualquier hardware del pc como el monito por ejemplo no se puede parar con VBS?

El codigo del cd rom es este:

[CODE]

Set oWMP = CreateObject("WMPlayer.OCX.7" )
Set colCDROMs = oWMP.cdromCollection

if colCDROMs.Count then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next ' cdrom
End If


Gracias!!!

3
Pascal / Re: Los Array
« en: Martes 1 de Abril de 2008, 12:49 »
GRacias por el link ma ido bn pasarme ;)




Salu2

4
Pascal / Re: Los Array
« en: Martes 1 de Abril de 2008, 01:42 »
Ei gracias por kontestar pero si posteo esto en un foro es justamente por k lo k e encontrado en google no me sirve ya k me lo explika con ejemplos k eso ya esta bn pero no me dice la funcion k acen los array o yo no lo entiendo, se hacerlos  pero nose la funcion k realizan




gracias de antemano

5
Pascal / Los Array
« en: Lunes 31 de Marzo de 2008, 23:29 »
Aver alguien me puede explicar que es un array y exactamente para que sirve ?

a ser podible les pido tmb un ejemplo lo mas sencillo posible para poder entenderlo sin ningun problema gracias!

6
Pascal / Re: Copiarse
« en: Sábado 29 de Marzo de 2008, 16:50 »
alguien save el codigo en pascal para que el exe que aga se autocopie? (sis igualito que un virus)!!!


Gracias!

7
Pascal / Re: Interrupciones
« en: Sábado 29 de Marzo de 2008, 16:21 »
gracias por los link pero no me keda mui klaro nadie save aki llamar a una interrupcion como el monitor??



i otra cosa, como puedo oner notas musicales en free pascal para que suenen en el altavoz del sistema?

pporfa ayuda!!!!





Gracias!

8
Pascal / Interrupciones
« en: Viernes 28 de Marzo de 2008, 21:57 »
Hola buenas a todos solo queria preguntarles si saven como llamar a una interrucpion en Free pascal, por ejemplo del raton o del CD ROM o de qualiquier otro hardware, monitor ect... por ejemplo, no hai alguna interrucpion para parar el monitor un tiempo determinado o para habrir la tapa del CD ect?


Gracias.

9
Pascal / Re: Cliente/servidor
« en: Jueves 27 de Marzo de 2008, 04:21 »
OK gracias me a quedado claro i bueno para hacer interrupciones como por ejemplo al CD ROM como lo ago?

10
Pascal / Re: Cliente/servidor
« en: Miércoles 26 de Marzo de 2008, 21:43 »
okok lo siento de beras en fin alguna respuesta sobre mis preguntas?





Gracias

11
Pascal / Re: Cliente/servidor
« en: Miércoles 26 de Marzo de 2008, 04:56 »
Oye como ago para llamar una interrupcion por ejemplo la del cd rom?





I otra cosa vi por un foro de internet que se pueden acer librerias para pascal i se v k ai una rulando pro ai que te permite poner fotos (algo kme dejo alucinado)

es veradd eso? como se hacen las librerias?


gracias

12
Pascal / Re: Cliente/servidor
« en: Miércoles 26 de Marzo de 2008, 04:02 »
Gracias tio de verdad


;)

13
Delphi / Re: De Pascal A Delphi
« en: Miércoles 26 de Marzo de 2008, 00:35 »
ok gracias pro la infot  pero una duda komo se hace para llmara a una UNTI si po ejemplo la unit es rock;n como lo ago?


Gracias

14
Delphi / De Pascal A Delphi
« en: Martes 25 de Marzo de 2008, 14:22 »
Weno mi problema es el siguiente e echo varias aplicaciones DOS en pascal i ayer mismo empeze con delphi (OBject pascal" que weno delphi es mas k na pascal peor em encontre la sorpresita k no es exactamente igual ya k me lio sobretodo en una parte llamada Type kien me puede expikar i poner un ejemplo de eso porfa el codigo k me da el gprograma al principio es esto:

Explikenme de k konsta kada aprte porfi

[CODE]

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs;

type
  TForm1 = class(TForm)
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

end.

15
Pascal / Cliente/servidor
« en: Martes 25 de Marzo de 2008, 01:44 »
Wenos tenia otros temas por ai pero vei ak no tenian ninguna respuesta i los  cerrado pero abro este para pregunta k como puedo hacer un programa en pascal que se comunique con otro algo tipo cliente servidor




A i como se hacen los botones?

No me digan Lazarus por k no me funciono en mi pc

Gracias!!

16
Pascal / Re: Free Pascal Pregunta???
« en: Lunes 24 de Marzo de 2008, 12:46 »
Tema cerrado..




gracias!

17
Pascal / Re: Free Pascal Pregunta???
« en: Domingo 23 de Marzo de 2008, 23:23 »
ok pues para que emntirte tengo mas preguntas como por ejempplo como hacer que el programa (el exe) se copie en otro directorio (vamos como hacen lo virus) no es mi intencio aviso!! pero deberia saverlo ai algun codigo?


I otra cosa nos e puede crear esto en pascal:

ejemplño:



 Que en un determnado momento se vea esto    


                                     Espere...


i estos 3 pntos suspensivo se muevan como si estubiera cargando i una vez un tiempo determinado aya pasado que continue con el programa


Es posible


GRacias de antemano!!!

18
Pascal / Re: Free Pascal Pregunta???
« en: Domingo 23 de Marzo de 2008, 18:52 »
A ok gracias tio eres la boma ;) oye i ara ya s ek me ago pesado i lo siento ee es k tengo muchas dudas pero esta es la ulima prometido ;)

Eso k me as expliakdo de los menus esto de


1> opcion tal');
ect ect

if opcion then wenoe so

Esta bn lo e provao i va de lujo lo uniko k nose como hacer para que una vez seleccionada la opciion i realizado el proceso vuelva al menu otra vez i t deje elejir otra vez,osea algo aisn:


(lo pongo sin el codigo)


Elije opcion:

Reiniciar
Buscar
ect
ect..

(ara imaginate k e seleccionado buscar)

(Ya e realizado la busceda i en fin todo el proceso)


PUES ARA KIERO VOLVER AL MENU PRINCIPAL OTRA VES SAVES OSEA K ME DEJE ELEJIR OTRA VEZ.


Como lo ago?







Gracias por todo tio!! ;)

19
Pascal / Copiarse
« en: Domingo 23 de Marzo de 2008, 14:09 »
Perdonad me ekivoke

20
Pascal / Re: Free Pascal Pregunta???
« en: Domingo 23 de Marzo de 2008, 12:12 »
Pues si este ya me esta bn muchas gracias de verdad!!!  weno i se ve k lo de poner un link en el prograam es algo imposible no?

21
Pascal / Free Pascal Pregunta???
« en: Sábado 22 de Marzo de 2008, 20:10 »
Aver primero decir k soi nuevo en seste foro i espero me puedan ayudar! bien dicho esto,Ai va mi primera pregunta:


Si por ejemplo yo quiero realizar un progtama en pascal (en free pascal) i quiero que cuando se abra el programa descargue un arhvio de internet como lo puedo hacer (eso es posible?)




I la segunda pregunta es:

Como debo hacerlo para crear un menu en pascal osea un programa que te de unas opciones i tu elijas kuala i depende kuala pues aga una kosa o otra osea algo asin:


Porgram nombre;

 uses crt;

  var

     a:string;

 begin

   pues k aki empiece el menu algo asin

 case a of  

  1 : acer una kosa
  2 acer otra cosa
  3 acer otra cosa
  ...
 else writeln('No has elejido ninguna opcion');
end;
end.

  enendeis?



Gracias!!!

Páginas: [1]