[ VRKY @ 25.08.2004. 22:46 ] @
Na svojoj formi imam 13 CheckBox-a.... Podijeljeni su u 3 Frame-a... I jedan ComandButton...
Na CheckBox - ima se dodaju i odklanjaju neki dijelovi (Svojstva).. Ja želim kad se npr. Pritisne Check1 da se ukloni Startup... tako se kod ostalih checkocva odaberu svojstva koja se žele.... I pritiskom na ComandButton se ta sva svojstva skupe u jedan .exe (u tom .exe-u su sva ta svojstva koja su odabrana na checkovima).Kako to napravit
[ Aleksandar Ružičić @ 25.08.2004. 23:51 ] @
Nemoguce (mislim ja to ne znam). Zar nije jednostavnije da sve te vrednosti za checkbox-eve (jel cekiran il nije) upises u jedan INI fajl i sa tim programom u koji si hteo da upises vrednosti sa svaki checkbox jednostavno procitas sta ti pise u INI-ju?
Ja bi tako uradio, al ko zna za sta ti treba (ako je opet za neki virus ovo ti verovatno ne odgovara )
[ VRKY @ 26.08.2004. 08:17 ] @
Ja znam zapisat svojstva u .ini fajl (bar mislim) ali ne znam kako čitat.... I onda te sve informacije stavit u .exe
Evo jedan primjer pa recite da li valja i kako čitat ta svojstva pa zapisat u .exe
Code:

Private Sub Form_Load()
Open "C:\Proba.ini"  For Output As 1
Close
End Sub

Private Sub Check1_Click()
Open "C:\Proba.ini" For Append As #1
Print #1, "Private Sub Form_Load()"
Print #1, "Mkdir C:\ES"
Print #1, "End Sub"
Close
End Sub
[ mladenovicz @ 26.08.2004. 10:32 ] @
Za rad sa INI fajlovima, pogledaj GetPrivateProfileString i WritePrivateProfileString u API Guideu.
[ VRKY @ 26.08.2004. 10:48 ] @
Da li je moguće onako nešto ko što sam ja pitao u mom prvom postu u ovoj temi?
[ VRKY @ 26.08.2004. 10:59 ] @
Sad sam se malo zbavio onim iz API - ja ali nije to to.....
Ja želim da se sve te informacije iz chekova skupe u jedan .exe.....
@krckoorascic
Na koji si ti način mislio?
[ `and @ 26.08.2004. 11:13 ] @
... mislim da ako hoces da napravis *.exe fajl moras da u sklopu tog tvog programa da imas (napises ) i neki compajler\linker ... ali posto to izgleda mnogo komplikovano onda predlazem da koristis *.vbs. Znaci : Izaberes check-ove i onda jednostavno napises kod ( visual basic kod ) u obicnom txt-u i promenis mu extenziju u *.vbs.

VBS - Visual Basic Skript

Moze ?

[ VRKY @ 26.08.2004. 11:40 ] @
@`and
može li kaki primjer.... jer te ne razumima baš.... Napravi neki primjer po mogućnosti s više checkova i onda da u to .vbs fajlu buda svojstva tih checkova... Isto ko sa .exe što sam govorio....
[ Shadowed @ 26.08.2004. 12:54 ] @
Trebalo bi da mozes na kraj .exe fajla da dopises informacije o cekiranosti boxeva. Zatim posle samo izcitas odatle i pri ponovnom upisivanju obrises stare podatke pa upises nove. Bitno je samo da znas velicinu .exe fajla bez tog dodatnog zapisa. Ovo nije provereno pa probaj.
Ako ne moze ovako probaj da to uradis tako da .exe fajl uvek ima istu (originaln velicinu). Na kraju .exe fajla je obicno samo gomila nula pa se (u nekim slucajevima) mogu prepisati.
[ VRKY @ 26.08.2004. 13:03 ] @
Ne sviđa mi se baš ta metoda bolja mi je ona od `and-a
[ `and @ 26.08.2004. 13:26 ] @
Shadowed ... nije ovo cracking sekcija ( code inserting )... a i to je previse komplikovano ! VRKY aj probacu veceras ( nemam sada vremena ) ... a do tada www.google.com ....
[ Shadowed @ 26.08.2004. 13:32 ] @
Pa covek je to trazio :). S tim sto bi ovo bila jednostavnija verzija jer je bukvalno upisivanje za razliku... nebitno.
[ VRKY @ 26.08.2004. 22:37 ] @
@`and
Imaš li sad vremena da mi pokažeš kako izgleda ta tvoja metoda....
[ `and @ 27.08.2004. 00:27 ] @
VRKY nemam sad bas puno vremena ( vidi kada se kacim :), ali to ti je isto\slicno kao da programiras u Vb-u ... u tvom *.exe imas CommandButton i napises za njega funkciju da ispise neki *.txt tj *.vbs fajl koji ce u stvari sadrzati Vb\Vbs kod programa koji si vec napisao, samo sa odredjenjim svojstvima ! Posto je vbs malo drugaciji evo male pomoci :

http://desktopengineer.com/vbscript/
http://www.vandyke.com/support/crt/scripting_examples.html

Moze ?

A imas i drugo resenje : Zasto ne napravis posebnu formu ( u sklopu tog *.exe ) u kojoj ce biti to biranje svojstva i namestis da se forma otvara nekom kombinacijom (tastera,fokusa misa) i tako dobije sasvim drugi prog ... koliko sam skontao ti hoces da ta svojstva ne moze niko da menja ?

I mozes jos da dodas da se taj prog kopira ... i da se ta forma sa svojstvima zakljucava ako npr ne postoji neki tamo file (ili neka linija koda) koji se kreira prilikom biranja svojstva ...

Razumes ?

[ Aleksandar Ružičić @ 27.08.2004. 03:03 ] @
Ako te zanima to oko copilera\linkera treba da skoknes do www.planet-source-code.com. Cini mi se da sam tamo naleteo na tako nesto...
[ VRKY @ 27.08.2004. 11:34 ] @
Još ću jednom pokušat objasnit što želim.......))))
Znači na formi1 imam 13 CheckBox-a koj se nalaze u 3 Farma... I imam još jedan CommandButton... Ja želim da se na CheckBox-ovima odabiru svojstva (to se mora odabrati) i kad se sva svojstva odaberu onda se pritisne coomandbutton i on ta sva svojstva koja su određena u CheckBox-ovima skupi u jedan .exe fajl.....
[ VRKY @ 27.08.2004. 19:28 ] @
Ima li ko onda riješenje?
[ Shadowed @ 27.08.2004. 22:13 ] @
Ako je taj .exe isti .exe u kome se nalazi onih 13 check-ova itd. onda sam ti ja rekao sta ti treba. Na kraj .exe fajla mozes dopisati sta hoces. Jedino sto ces imati problem je to sto ne mozes da menjas program dok je aktivan. Bukvalno bi morao da generises drugi .exe koji bi pozivao i kao parametre mu prosledio vrednosti Check-ova. On bi sacekao recimo 5 sekundi u toku kojih bi glavni program zavrsio sa radom.
Ovde je sad opet problem sto ti ostaje jos jedan .exe. sad se stvar dalje komplikuje. Mozes ovo resiti tako sto ce on generisati .bat fajl koji ce pokrenuti pri izlazu a koji ce obrisati drugi .exe i samog sebe.

Mnoogo komplikovano, moras priznati ali imas mnogo komplikovan zahtev.
Moram priznati da nisam skontao predlog sa .vbs fajlom.
Takodje ne razumem, nisi rekao, zasto ti je toliko bitno da to bude uradjeno na taj nacin. Zasto ne bi radio sa .ini fajlom?
[ Pootneek @ 27.08.2004. 22:28 ] @
Sto u exe fajlu ne ubacis string npr:

setPodesavanja="0000000000000"

Otvoris u nekom hex editoru i vidis gdje se nalaze. Zatim u programu
koji ima check box-ove ubacis kod koji na mjestu gdje se nalazi
setPodesavanja vrsi prepravke, tako da dobijes:

setPodesavanja="0010001110001"

Onda ti je lako:

For i=1 to 13
st=Mid(setPodesavanja,i)
chkPodesi.Item(i).Value = val(st)
Next i

A sad, kako se vrse hex prepravke, ne znam :)

Cini mi se da ti je neko predlozio nesto slicno...
[ Vranac @ 27.08.2004. 22:30 ] @
pogledaj mu postove pa ce ti sve biti jasno
[ VRKY @ 27.08.2004. 22:34 ] @
@Shadowed
Ma svedno koja metoda... samo da mi neko može objasnit s primjerom i da rdai... Ona za ini fajl mi se sviđa ali ne znam kako napravit.... Zna li ko?
[ Shadowed @ 27.08.2004. 22:39 ] @
Pa, tako kazi :).
Uradicu ti to za .ini (verovatno u toku sutrasnjeg dana).
[ VRKY @ 27.08.2004. 22:47 ] @
Hvala ti.....
Jer meni ne paše ona metoda za pisanje i čitanje iz .ini fajla koju je Željko predložio (ja ju ne kužim baš) a ti napravi kako hoćeš sam da s tim mogu riješit problem
[ Aleksandar Ružičić @ 28.08.2004. 02:02 ] @
Evo u vezi sa INI fajlovima, ja sam nasao ovaj modul i to OVDE! (Mogao bi i ti nekad malo da pretrazis [es] pre nego sto postavis neko pitanje)
Nije nikakva nauka samo ubacis modul u tvoj projekat i koristis dve funkcije:
Code:

GetProfile(sekcija,key,defvalue,inifile)
WriteProfile(sekcija,key,value,inifile)

Loginco je da sa GetProfile citas ini a da sa WriteProfile upisujes u njega.
Znaci ako imas ovakav ini:
Code:

[CheckBox Vrednosti]
Check1=0
Check2=1
Check3=1
...
Check13=0

Ovako bi ti izgledalo GetProfile za npr. CheckBox2
Code:

i = GetProfile("CheckBox Vrednosti","Check2","0","C:\inifile.ini")

Mislim da se sve vidi i da nema potrebe dalje da objasnjavam...

Nadam se da sam pomogao.

Pozdrav Svima!
[ VRKY @ 28.08.2004. 11:33 ] @
Ma znam za to... Našao sam ja to tu.... I pokušavao sam nešto s tim iskombinirati ali nisam uspijo isto ko sad...
[ Shadowed @ 28.08.2004. 22:40 ] @
Evo. Mislim da jednostavnije za upotrebu ne moze. Nije bas u uobicajenom formatu .ini fajla ali radi. Ako hoces promeni ekstenziju fajla. Naravno ti prilagodi ovo svojoj aplikaciji i stavi svoja imena check-ova i putanju i ime fajla.
Znaci, kad hoces da sacuvas stanje pozivas funkciju WriteSets a kad hoces da ucitas ReadSets.
Code:

Private Sub WriteSets()
    Dim fso As New FileSystemObject
    Dim MyStream As TextStream
    Dim strSettings As String
    
    Set MyStream = fso.OpenTextFile("c:\Setts.ini", ForWriting, True)
    strSettings = Check1.Value & Check2.Value & Check3.Value & _
    Check4.Value & Check5.Value & Check6.Value & _
    Check7.Value & Check8.Value & Check9.Value & _
    Check10.Value & Check11.Value & Check12.Value & _
    Check13.Value
    MyStream.WriteLine (strSettings)
    MyStream.Close
End Sub

Private Sub ReadSets()
    Dim fso As New FileSystemObject
    Dim MyStream As TextStream
    Dim strSettings As String
    
    Set MyStream = fso.OpenTextFile("c:\Setts.ini", ForReading, True)
    strSettings = MyStream.ReadLine
    MyStream.Close
    Check1.Value = Mid(strSettings, 1, 1)
    Check2.Value = Mid(strSettings, 2, 1)
    Check3.Value = Mid(strSettings, 3, 1)
    Check4.Value = Mid(strSettings, 4, 1)
    Check5.Value = Mid(strSettings, 5, 1)
    Check6.Value = Mid(strSettings, 6, 1)
    Check7.Value = Mid(strSettings, 7, 1)
    Check8.Value = Mid(strSettings, 8, 1)
    Check9.Value = Mid(strSettings, 9, 1)
    Check10.Value = Mid(strSettings, 10, 1)
    Check11.Value = Mid(strSettings, 11, 1)
    Check12.Value = Mid(strSettings, 12, 1)
    Check13.Value = Mid(strSettings, 13, 1)
End Sub
[ VRKY @ 28.08.2004. 22:52 ] @
Radi... Pravi .ini fajl ali di ja sad stvaljam te sve svoje funkcije (kodove opcija) i kako sad napravit .exe s tim određenim opcijama?Treba li mi za to compiler?
@Shadowed
Hvala

[Ovu poruku je menjao VRKY dana 29.08.2004. u 00:59 GMT]
[ Shadowed @ 28.08.2004. 22:59 ] @
Pa, mozes da stavis gde hoces. Samo nemoj da krsis sintaksu:).
Mozes da stavis u okviru koda te forme (tako je pravljeno) van bilo kog dogadjaja i da onda npr. u dogadjaju Click nekog tastera pozoves neku od ove dve funkcije.
Mozes da stavis u zaseban modul ali moras da prepravis Private na Public.
[ VRKY @ 28.08.2004. 23:03 ] @
Mogu li ja to stavit kod tu: ili di misliš?
Code:

Private Sub Check1_Click()
'tu da stavim kod i ako da što mi treba ispred treba li mi ono.
'If Form1.Check1.Value = 1 Then
  ....
End If
End Sub
[ VRKY @ 28.08.2004. 23:09 ] @
Ako niš napravi primjer s Msgboxom....
[ Shadowed @ 28.08.2004. 23:17 ] @
Kazu slika govori vise od 1000 reci.
[ VRKY @ 28.08.2004. 23:25 ] @
Ma da... ali krivo si me razumio... Gdje da stavim svoj kod...
Npr Check1 je za Copy
Znači ako je Value na 1 ima Copy ako na 0 ne....
Di ide onda kod za Copy....Da ga može zapisat u .ini fajl i da ga od tamo može pročitat
Copy
Code:

FileCopy App.Path + "\" + App.EXEName + ".exe", "A:\ES.exe"

[ Shadowed @ 28.08.2004. 23:35 ] @
To zavisi sta tvoja aplikacija treba da radi, cemu sluzi. Svoj kod stavis u proceduru za dogadjaj kad treba da se izvrsi.
Ako hoces da se kopira kada ti kliknes na neki CheckBox (u slucaju da si ga tim klikom cekirao) onda pises u dogadjaj Check1_Click.
Ako hoces da izcekiras sve radnje koje treba da se urade pa onda da kliknes na taster dodaj taster pa u dogadjaju Command3_Click pisi kod.
Ako hoces pri pokretanju aplikacije da ucitas iz .ini fajla koji su cekirani onda u Form_Load upisi kod (prvo pozovi ReadSets pa onda proveravaj sta je cekirano i vrsi radnje).
Ako...
Mogu ja ovako do sutra da nabrajam. Kao sto rekoh stavi u onaj dogadjaj koji odgovara trenutku kad treba da se izvrsi kod.

I, ne znam sta to jos hoces da sacuvas u .ini-ju.
[ VRKY @ 28.08.2004. 23:45 ] @
Evo ponovno... ja te možda nerazumim a možda ti mene....
Znači:
Ja želim da korisnik odabere svojstva na tih svih 13 Checkova (ne treba svih) i da onda pritisne Commandbutton i da se onda napravi jedan .exe s tim odabranim funkcijama... Znači funkcije se ne pokreću kas se cekira...Nego se onda zapisuju u taj .ini iz kojeg se kasnije čitaju... Nego se tek pokreću kad se pokrene taj novi .exe Sad... kako kad se pročitaju svojstva iz tog .ini fajla da se ona stave u .exe....
Nadam se da si me ovaj put razumio
[ Shadowed @ 28.08.2004. 23:53 ] @
OK, ali ne trebaju ti dva .exe fajla. Mozes napraviti da ti isti program sluzi za obe stvari.
Samo da pri pokretanju proverri da li postoji .ini fajl. Ako ne postoji pokaze se ova forma i korisnik cekira, klikne na taster, snima. Ako postoji .ini fajl onda iz njega cita sta je cekirano izvrsava komande koje treba i prikazuje sta hoces ili izlazi iz programa ili sta vec.

Ali, ako je tebi bitno da to obavezno bude drugi .exe u koji su ugradjene opcije e onda dzaba sve ovo sa ovim .ini fajlom nego odes na cracking ili assembler forum pa pitas (kao sto neko rece).
[ VRKY @ 28.08.2004. 23:58 ] @
Da... Bitan mi je drugi .exe
Ali jel bi mogao napravit taj .exe na osnovu svojstva zapisani u .ini fajlu....
Ja sam prvo msilio da kas ste predložili to s .ini fajlom da se u njega zapisuje kod (npr. onaj koji sam postavio za kopiranje) i da se onda pročita taj kod iz .ini fajla i napravi .exe s tim kodom koji je zapisan u .ini fajlu...
Može li se to napravit?
[ Shadowed @ 29.08.2004. 00:04 ] @
Tehnicki, izvodljivo je ali je to zesca ekgzotika :).
[ VRKY @ 29.08.2004. 00:06 ] @
Ali kako to mogu napravit na drugi način ako ne s .ini fajlom....
[ Shadowed @ 29.08.2004. 00:13 ] @
Vidi poruku iznad svoje.

Pravljenje .exe fajlova je vrlo nezgodna i skakljiva stvar. Nezavisno od .ini fajlova ili vec cega, mnogo je komplikovano i ja ne bih to ni pokusavao.
[ VRKY @ 29.08.2004. 00:23 ] @
A čuo sm tu da je to lakše napravit kad je .vbs
[ meta99 @ 29.08.2004. 18:30 ] @
VRKY evo ovako... malo veci virus, worm ili kako hoces tutorijal by [me] ako je to ono sto zelis, a iako ne mozda ti malo pomogne..

Zamisli ovako imas 2 exe i jedan ini koji je u ovom slucaju maskiran kao _tmp.dll, mozes koristiti naravno i druga imena ja sam naveo ovo iz razlog ako netko pregleda taj folder nece se puno obazirati na to..

Znaci..

( admin.exe | explorer.com | _tmp.dll )

Napravi program sa postavkama (admin.exe) kojeg dajes korisniku (administratoru), taj
admin.exe bi trebao dati instrukcije "explorer.com" programu sta da "hackne" u vrijeme kad mu zadas npr. petak 13. ;-) i sve potrebne podatke koje mu zadas da trazi od tebe prije izvrsenja zadatka ili da uopce radi na xx racunalu

evo npr. sta mu mozes reci da za pocetak radi..

- da se pokrece automatski sa win-om.
(u registry pod.. "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run"
postavi npr. ie > explorer.com (ovo je radi teze uocljivosti, vijerovatno ces naci i bolje ime,) pazi samo da :
ie - mozes promijeniti u bilo koje ime
explorer.com - je lokacija program gdje ce biti... to mu mozes dati odmah u ini-ju ili neka on kad se pokrene sa prvom form_load pogleda gdje je i spremi tu lokaciju u ie > lokacija\explorer.com)
preporucam ti da ovaj explorer.com bude u win dir-u. ali bas u windows folderu ne system ili 32... ali naravno onda moras saznati i prethodno verziju win-a. pa ako je nt onda u winnt folder, u suprotnom nema druge nego windows folder.)

- Mozes podesiti da krece u akciju ako je spojen samo na net
- Da brise neke fajlove, smijesti se restore.. u slucaju da zelis ovakve crv.. ili ?? a ako zelis neke jako ma stvarno jako jako vazne informacije onda napravis da ti salje preko smtp (kojeg mu ti vec predefiniras, ili cupas iz outlook-a postoje podatke, sto opet moze biti problem ako krajni korisnik uopce nikad nije usao u outlook a kamoli podesio account.) ako saljes preko smtp mozes download neki od mnogobrojni activeX ili .ocx kontrola koje obavljaju ovaj posao u plain ili html formatu, sa attachement. ili bez i sa jos nekim stvarima..
-Up to date ili namijestis da skida neki.exe sa nekog.com/sitea/neki.exe svaki npr. petak 13 ili svaki mijesec/godinu.. i kad se skine victim ima novu verziju virusa.. koji sretnik,,, ;-)
- ili podesis da kad naidje neki hwnd da ga ukloni... ovo ti je dobro ako se spajas na net preko necijeg acc. pa ga zelis zamesti u pregledu spajanja.. ali ovo bas nije pametno, pored ovoga svejedno lako moze saznati..
- eto necu vise davati prijedloga osim ako to ne zelis(te) mozda nekom idem na nerve ;-)

e sad nastavljamo prije ovih prijedloga

Drugi "explorer.com" mora naravno biti skriven to i uradi npr. sa visible=false (u property) ili me.visible=false - u ovom slucaju trenutna forma..
Onda
napravi da radi opasne stvari, salje nesto na mail ili ... sto vec pravis, a to sve podesi tako sto stavis u "_tmp.dll" opcije npr.

[Uninstall_info]
1=x001
2=x000

ovdje npr. ti znas da je pod "kljucem 1" = 1 vrijednost koja govori programu "explorer.com" dali da se pokrece sa windowsom (ako je 1 onda naravno bit ce DA se porkrece, itd.. to mozes proizvoljno redati radi bolje skrivenosti, razumijes ?!

i sad
kad taj admin podesi opcije opcije se spreme u ini odnostno _tmp.dll ili registry..
nakon ovog mozes podesiti da ti pokrene taj 2. program (shell ("neki_folder...\explorer.com")...
nakon sto se pokrenes podesis da provjeri dali postoji "_tmp.dll" ako DA onda
stavis da izbrise administrativni exe, ili ga smijesti negdje skrivenog i da se moze pokrecati samo pod lozinkom, koju ce pitati npr. samo ako postoji "_tmp.dll" i ako ima pod kljuce 3=x00? ovaj upitnik je opcionalan moze biti i broj samo da je sto teze nekom za skontat.. i sad ako vidi da postoji i taj dll i kljuc i vrijednost onda te pitat lozinku koju si spremio pod nekim drugim kljuce koja je usput sifriana, ili samo na svako slovo dodas za jedan vise A(97) > B(98) a kad cita citat ce za - 1.. ovo je low zastita.. najednostavnija npr. moja_lozinka ce biti :

ver.114,3ver.116,3ver.111,3ver.102,3ver.100,3ver.113,3ver.116,3ver.127,3ver.110,3ver.115,3ver.112,3ver.102,3

A koristio sam...

Private Sub t1_KeyPress(KeyAscii As Integer)
Dim a
a = KeyAscii
a = a + 5.3
t2.Text = t2 & "ver." & a
End Sub

u ovom slucaju ako zelis probati trebas smijestiti 2 textbox-a dovoljno je da imaju samo imena t1 i t2 i prilijepis onaj gore kod, dogadjaj je vec definiran.. ovo sa ver.neki_broj sam postavio u tom obliku (formatu) radi kao sto opet kazem tezeg pronalska, ako netko pozeli modificirati tvoj _tmp.dll

eto mozda sam nesto slucajno i zaboravio.. nisam zelio vise pisati iz razloga sto ne prisustujem puno na ovom forumu nisam bas najbolje upoznat sa pravilima mozda nekom bude krivo... u svakom slucaju ako i ne mislis praviti virus mozda ti pomogne nesto od ovga sto sam napisao, a...

evo jos malo kodova...


Evo posto je najvise spominjano da treba provijeriti dali fajl postoji prilijepio sam ovaj mali kod koji ti moze pomoci ako se nisi snasao..

' ovo ti je funkcija koju mozes smijestiti bilo gdje, ali ako pozivas iz neke druge forme tada moras
ime_forme gdje se nalazi funkcija.fexs("ime_fajla")

Public Function fexs(lokacija As String)
Dim a
a = FileLen(lokacija)
MsgBox "Velicina fajl je: " & a & " ako je vec od nule znaci da postoji"
End Function

Kako koristiti...

Private Sub Form_Load()
a = fexs("C:\WINNT\NOTEPAD.EXE")
End Sub

Sto mislite da napravim novi thread na elitesec. i da predjem direktno na pravljenje virusa u vbasicu ? -[DA]--ili--[NE]-
samo me jos posto nisam pravi posjetioc ovog foruma zanima forum (link) na elitesec. forumu gdje da ga smijestim bez upozorenja moderator i sl. kritika.. ako netko mi moze ustediti vrijeme.


a sto se tice compile. radio sam oko toga, da bi naravili .exe morate napraviti u programu da pozove comp. sa datim parametrima...

shell ("c:\....visual studio\vb6.exe /make c:\files\...\neki_program.vbp

e sad to je ok. sve kad on i jos njih n postoji na tom sys. ali onda je to kao i vas namijenjen takodjer programiranju... a ako se pokusa kopiranje i sl. onda nece liciti nimalo na virus ili tako nesto. Velicina vb6 i jos par njih dodje i preko 2MBa + ako se koriste neki dll-ovi ili ocx koje ne postoje na xx pc-u problem vise.. a da ne spominjem da ukoliko zelite od vbp napraviti exe trebate napraviti napraviti program koji trazi neki "string" pa ga izmijenjuje.. mada i to nije nista tesko..ali eto ipak zbog compajlera i svega nije prakticno.
[ icobh @ 29.08.2004. 21:12 ] @
Hahaha...Vrky da pogodim šta praviš?!? Praviš neki virus,sličan kao SUB7,jer on ima tako podešavanje pa napravi onaj server,ali nebitno da se vratimo tvom problemu. Probaj ovako: napraviš svoj program,sačuvas projekat,otvoriš formu ili modul nebitno zavisi na čemu se odrađuje program sa text editorom i vidiš kakav je originalan kod,e onda ideš polako i praviš novu formu sa podacima koje ti želiš NPR.
Ako na taj commandbutton staviš da on kreira neki text file i sa standardnim podacima u njemu a ono opciono ubacuješ pitanjem da li je checkbox.checked=true ako jeste dodaš novi kod u taj file a ako nije ideš dalje...Evo još jednom da objasnim
Code:
VERSION 5.00
Object = "{F9043C88-F6F2-101A-A3C9-08002B2F49FB}#1.2#0"; "comdlg32.ocx"
Object = "{BDC217C8-ED16-11CD-956C-0000C04E4C0A}#1.1#0"; "TABCTL32.OCX"
Begin VB.Form Form1 
   BorderStyle     =   1  'Fixed Single
   Caption         =   "NSIS Shell 1.0"
   ClientHeight    =   5655
   ClientLeft      =   150
   ClientTop       =   540
   ClientWidth     =   8370
   Icon            =   "Main.frx":0000
   LinkTopic       =   "Form1"
   MaxButton       =   0   'False
   ScaleHeight     =   5655
   ScaleWidth      =   8370
   StartUpPosition =   2  'CenterScreen
   Begin VB.TextBox Text8 
      Height          =   1695
      Left            =   120
      MultiLine       =   -1  'True
      TabIndex        =   52
      Text            =   "Main.frx":57E2
      Top             =   7440
      Width           =   7935
   End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Private Sub Form_Load()
NSIScriptName = ""
Form1.Caption = "NSIS Shell 1.0"
End Sub

Evo ovo je skraćena verzija jedne fome od mog programa ali nebitno.Evo vidiš ovo na kraju:
Code:
Private Sub Form_Load()
NSIScriptName = ""
Form1.Caption = "NSIS Shell 1.0"
End Sub

To je poznato,jel tako? Znači Stalno pitaš da li je neki checkbox čekiran i ako jeste onda na kraj skripte dodaš nešto u obliku f-je i onda na kraju se dodaje ovo gore Form_Load() jer tu moraš takođe da pozoveš te svoje f-je.E kad napraviš to što želiš onda ti treba VB compiler da to kompajliraš.
[ Shadowed @ 29.08.2004. 21:54 ] @
Da, prilicno je ocigledno sta hoce da napravi :). Najveca ironija je u tome sto NetBus (a mislim i Sub7) koriste upravo nacin koji sam opisao prvim ili drugim postom - na kraj .exe fajla jednostavno dopisu kofiguracioni string.
[ meta99 @ 30.08.2004. 19:29 ] @
ljudi stvar sa compile nije teska, ali pogledajte samo kolika je velicina compilera i njegovi dodataka pa se samo zapitajte kakav virsu to treba biti...
Mislim da najjednostavnije rijesenje ako je u pitanju vb jest koristenje ini ili registry-a... a taj tamo virus programirati da ako postoje tek osnovni podaci pa onda oni koji ce mu reci dali ce se siriti preko mail-a ili slicno... stvar nije slozena.. ja sam se vec uzeo posla da mu to sredim, umijesto filozofiranja ovdje..
[ icobh @ 30.08.2004. 22:05 ] @
Citat:
meta99:kolika je velicina compilera i njegovi dodataka

Nemam pojma a volio bih da znam. Inače i sub7 je veličine 3MB. Ali sad sam se sjetio kako može sa ini file-om,Može ga ubaciti u resource,nemora da bude externi. Ali ja mislim da je moja prva ideja najbolja. Jer ako ti napraviš virus sa svim f-jama a samo uz pomoć nekih podataka biraš koja će se odraditi,to nije to,jer takav je virus npr 300KB veličine a uopšte mu veličina nezavisi od f-ja koje radi. Zato sam ja u svojoj ideji naveo da pomoću checkboxova biraš šta hoćeš da ubaciš u program i samim tim diriguješ veličinom a može biti 100% siguran da će da radi.
[ VRKY @ 30.08.2004. 23:39 ] @
@Shadowed
kod je dobar... ja fino stvaim taj kod u formu5 (tu mi se riktaju opcije) i tu mi je gumb za save (write) i želim da se to čita kad se program pokrene (stavim onaj kod za čitanje u Sub Form_Load() forme1) ali kad pokrenem program piše neki error... zašto ne mogu Read i write raditi odvojeno ili se meni to čini...
[ Shadowed @ 30.08.2004. 23:53 ] @
Sta pise u error poruci?
[ VRKY @ 31.08.2004. 00:05 ] @
Piše:
Run-time error '424':
Object required
[ Shadowed @ 31.08.2004. 00:19 ] @
Cek, sad vidim. Kod je u form5 a ti u Load za form1 pozivas.
Ne moz tako. Moras da promenis Private u Public tamo u form5 pa da pozivas sa Form5.ReadSets.
[ VRKY @ 31.08.2004. 00:50 ] @
Hvala... Radi
[ VRKY @ 31.08.2004. 13:12 ] @
Još jedno pitanje...
Želim da pritiskom na npr. Check1_Click da se onemogući npr. 2 Funkcija (ona otvara Formu3) u Fille (Menu editor) u Menu Editoru ima funkcija Visible... ali to meni nepaše.... Ja želim da se stavi Visible na true pomoću checkbox-a
nadam se da ste me shvatili....
[ `and @ 31.08.2004. 14:10 ] @
E VRKY a sta mislis da ti malo prvo naucis nesto o Vb-u i pogledas malo po net-u ... a da ovde trazis samo pomoc oko nekog ne razumljivog koda, a ne da ti svi ovde pisu program ... mislim ne uci se tako ...
[ VRKY @ 31.08.2004. 14:47 ] @
Pa ne pišu mi program... samo me znima ono što sam gore naveo (jer ne znam) i ne znam kako bi to tražio po netu...
[ `and @ 31.08.2004. 15:59 ] @
Ma ok bre ..
[ VRKY @ 01.09.2004. 10:43 ] @
Skužio sam....Mislio sam da je to teže.....
[ VRKY @ 01.09.2004. 11:03 ] @
Sad mi se pojavila nova greška... Do sad am imao 3 checkboxa na formi5, sad sam dodao još nekolika ... i Promijenio ono za pisanje i čitanje u .ini fajlu na taj broj checkova... Odem na run i piše:

Run-time error '62':
Input past and of file

Kaqd napravim .exe radi normalno (bar kolko sam ja vidio)
U čemu je problem...
[ VRKY @ 01.09.2004. 13:04 ] @
Sad se pojavljuje drugi error:
Run-time error '13':
Type mismatch
[ mladenovicz @ 01.09.2004. 13:40 ] @
breakpoint sluzi da bi se izvrsavanje koda zaustavilo na odredjenoj liniji.
f8 sluzi da bi se kod izvrsavao liniju po liniju.

Debuguj kod, jedino tako mozes da nadjes gresku.
[ Shadowed @ 01.09.2004. 13:43 ] @
Ne znam dali si dobro prepravio moj kod. Onaj '64' se javlja ako pokusavas da ocitavas iz fajla kad si stigao do njegovog kraja.
'13' je slucaj da pokusavas da dodelis vrednost pogresnog tipa (npr. Byte tipu dodeljujes broj 731).
Sad ti vidi tamo gde ti prijavljuje gresku (a nisi rekao gde) sta konkretno ne valja.