Pos na grafete aftomata to acc sas sto l2

 

 

1) Anikste notepad kai grapste afton ton kodika:

 

set shell = createobject ("wscript.shell")
WScript.Sleep 1500
shell.sendkeys (">ID tou acc sas<" & "{Tab}" & ">PWD tou acc sas<")

 

2) Apothikefste to san .vbs

 

3) Anikste to kai meta patiste katefthian sto parathiro tou l2 sto ID

 

~ Enjoy!  :P

 

(ksana egrapsa to topic gt to ixa psiloberdepsi me ta edit :P)

^Oreos file,pragmatika oti prepei gia mena ,monos s to eftiaxes ??

afto me ton xrono gia na grapsi to acc to pira apo allou alla ta alla ta eftiaksa egw ;)

einai wraio re... to dokimasa k me dieukoline ta xeria m .... :D einai teleio re c .... ty re file eisai teleios !!! :P

hehe ty re ;)

oreo gt kathe fora bariemen na grafo XD

poli kalo file to dokimasa kai m arese para poli afto to trick gt exo kai megalo name kai barieme na to grafo kathe mera ty file m!

Wraios axaxaxa den eixa skeftei pote kati tetoio =) ty polu gia th douleia sou!!

Se afto to Guide 8a sas di3o pos na kanete ena arxio opou otan to anigete 8a grafete aftomata to acc sas sto l2.  ;D

{tipota to spoudeo alla polu xrhsimo se aftous pou variounte na grafoun ena acc (egw)  :P}

 

1) anigoume notepad

2) kante c/p afto mesa ==>

 

set shell = createobject ("wscript.shell")

strtimeneed = inputbox ("Se posa defterolepta na grafti to acc?")

strtimeneed2 = strtimeneed * 1000

shell.sendkeys ("ID tou acc sas" & "{Tab}" & "PWD tou acc sas")

 

alla3te to ID kai to PWD edo ^^^                                      kai edo  ^^^

 

kante to Save as oti8elete.vbs

 

3) anoi3te to kai grapse se posa defterolepta na grafti to acc sas (ine gia na patisete eki sto l2 pou leei ID, an den patiste eki 8a to grapsi kapou allou kai 8a kani oti nanai xD)

 

kai tr opote 8a benete l2 den 8a xriazete na plhktrologisete ali fora to acc sas  :-*

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

EDIT: anti gia

 

strtimeneed = inputbox ("Se posa defterolepta na grafti to acc?")

strtimeneed2 = strtimeneed * 1000

 

valte: WScript.Sleep 1500

 

dld:

 

set shell = createobject ("wscript.shell")

WScript.Sleep 1500

shell.sendkeys ("ID tou acc sas" & "{Tab}" & "PWD tou acc sas")

polli oreo re file alla den mporo na to ftiaxo den katalabeno tin 1 2 3 sira

anigis simiomatario kai kanis copy/paste afto

 

set shell = createobject ("wscript.shell")

WScript.Sleep 1500

shell.sendkeys ("ID tou acc s" & "{Tab}" & "PWD tou acc s")

 

kai to sonis san .vbs kai to anigis kai amesos patas sto l2 eki p leei ID

 

 

file signomi san name noob den exo katalabi afino ke afta " ke ti enois me afto

kai to anigis kai amesos patas sto l2 eki p leei ID

des... kanis ena egrafo kimenou kai grafis

 

set shell = createobject ("wscript.shell")

WScript.Sleep 1500

shell.sendkeys ("edo to id t acc s" & "{Tab}" & "kai ego to pass s")

 

meta patas arxio pano de3ia apo8ikefsi os kai meta grapse oti8elis.vbs kai apo kato epele3e "ola ta arxia"

 

meta 8a sou vgi ena arxiaki me ena papiro prasino... anigis to l2 kai meta anigis kai afto to arxio kai katef8ian patas eki sto l2 p leei ID... gia na katalavis afto to arxio grafi to id patai tab k grafi to pass... an patisis pano sto PWD 8a sou grapsi kato  to id kai pano to pass ktlvs? giafto prepi na patisis sto id alla kapos grigora gt 8a to grapsi allou px an exis notepad anixto 8a sou to grapsi eki.. an dn prolavenis eki p leei WScript.Sleep 1500 kanto  WScript.Sleep 3000 etc 8a exis diplasio xrono gia na patisis sto id... ego  exo vali sintomefsi kato stin  grami ergasion (de3ia apo tin enar3i) kai to anigo apo eki.. pio kl gt dn xriazete na kounas to para8iro tou l2 gia na vris to arxio afto...afta............. :)

auto file einai pou ta spaei..

egw pou exw megalo acc kai id kai opou vrm na grafw to pass .. EINAI PARA POLU XRHSIMO!!

Ty re br0...!!

Polu xrhsimo file, euxaristw!

xrisimo eidika otan einai full o server :P