MyCity » Pascal -> Delphi » Kreiranje servisa

Kreiranje servisa

Napisano na dan: 27.3.2007

Kreiranje servisa
Sledeća strana Pagination

Idi na vrh

Poslao: 27 Mar 2007 09:42
Idi na vrh
offline
  • Pridružio: 03 Nov 2006
  • Poruke: 59

Zna li neko, kako da iz Command Promt-a kreiram service ili da ga samo instaliram.
Pokusao sam ovako : u komandnooj liniji da ukucam:

WeblinkProject.exe -install

ali nije uspjelo. WeblinkProject.exe je aplikacija, naravno.



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 27 Mar 2007 10:39
Idi na vrh
offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

Ajde objasni malo bolje.
Hoces da napravis sistemski servis?
Aplikacija mora malo drugacije da se isprogramira ukoliko zelis da napravis servis (service).



Poslao: 27 Mar 2007 11:22
Idi na vrh
offline
  • Pridružio: 03 Nov 2006
  • Poruke: 59

Pa ovako radi se o webaplikaciji, radjenoj u Intraweb Tehnologiji.
Zove se : WeblinkProject.exe
Putanja do nje je : C:\Weblink Project.
Sada hocu da kreiram servis za tu aplikaciju, znaci da se nadje u servisima.

Start -> Control Panel -> Administrative Tools -> service

Ime servisa je DIGIT Weblink Application, bar bi trebalo da se tako zove, ali to je manje bitno.

pokusavao sam sa komandama u command promt-u :

WeblinkProject.exe -install
sc create DIGIT Weblink Application binPth=c:\Weblink Project\Weblinkproject.exe

ali ni jedna niti druga ne kreira servis.

Jos jedna stvar:

program WeblinkProject; uses   Forms,   IWMain,   IWInitISAPI,  // IWInitStandAlone,   ServerController in '..\Forms\ServerController.pas' {IWServerController: TIWServerControllerBase},   UserSessionUnit in '..\Forms\UserSessionUnit.pas' {p: TIWUserSessionBase},   BLOBlibrary in '..\Forms\BLOBlibrary.pas',   citac_sifre in '..\Forms\citac_sifre.pas',   ConsoleApp in '..\Forms\ConsoleApp.pas',   BrowseFiles_source in '..\Forms\BrowseFiles_source.pas' {browse_files: TIWAppForm},   BrowseMail_source in '..\Forms\BrowseMail_source.pas' {browsemail: TIWAppForm},   dowload_source in '..\Forms\dowload_source.pas' {download: TIWAppForm},   help_source in '..\Forms\help_source.pas' {help: TIWAppForm},   imageviewer in '..\Forms\imageviewer.pas' {imageview: TIWAppForm},   INDEKSIRAC in '..\Forms\INDEKSIRAC.pas' {INDEKSER},   Korisnici_setup_form_source in '..\Forms\Korisnici_setup_form_source.pas' {korisnici_setup_form: TIWAppForm},   login_source in '..\Forms\login_source.pas' {login: TIWAppForm},   mailcompose_source in '..\Forms\mailcompose_source.pas' {mailcompose: TIWAppForm},   searchun in '..\Forms\searchun.pas' {search: TIWAppForm},   upload_source in '..\Forms\upload_source.pas' {upload: TIWAppForm},   main_source in '..\Forms\main_source.pas' {main: TIWAppForm}; {$R *.res} begin  // Application.Initialize;  // Application.CreateForm(TformIWMain, formIWMain);  // Application.Run;   IWRun; end.

Ovako je kompajlirana.

Poslao: 27 Mar 2007 11:44
Idi na vrh
offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

Pojma nemam oko web servisa, tj. da li se razlikuju od sistemskih servisa.

Procitaj sledece: [Link mogu videti samo ulogovani korisnici]
To je osnova za NT servise.

Poslao: 27 Mar 2007 15:54
Idi na vrh
offline
  • Pridružio: 03 Nov 2006
  • Poruke: 59

Ipak :

imeaplikacije.exe -install

radi, medjutim problem je sto ja nemam IWInitStandAlone u bds2006 i ne mogu ga ukljuciti, a izgleda da je upravo on potreban da bi sve radilo kako treba.
IWInitStandAlone postoji u delphi7, odnosno intraweb5, pa kada ja dodam putanju kako bi aplikacija vidjela IWInitStandAlone iz lib-a delphi7, ona to ne konta, sto nije ni cudo jer postoji samo IWInitStandAlone.dcu, a nema IWInitStandAlone.pas.

Moze li se nekako od .dcu napraviti .pas

Poslao: 27 Mar 2007 16:32
Idi na vrh
offline
  • Pridružio: 04 Sep 2003
  • Poruke: 24135
  • Gde živiš: Wien

Citat:Moze li se nekako od .dcu napraviti .pas
Da to moze, onda ne bi mogle da se naprave shareware komponente za Delphi Smile
DCU su vec iskompajlirani uniti, tako da nema leba. Eventualno da od njih napravis neki unit koji bi imao samo imena procedura i funkcija, a ostalo da bude samo inline asembler dobijen dekompajliranjem DCU-a.
Jedini kastven dekompajler koji postoji za Delphi je DeDe, probaj ako njime mozes nesto da postignes, mada time polako zalazis u nelegalne aktivnosti, pa ti vidi Mr. Green

Poslao: 28 Mar 2007 09:02
Idi na vrh
offline
  • Pridružio: 03 Nov 2006
  • Poruke: 59

Rjesio sam problem !

Naime, bilo je potrebno samo ukljuciti

IWInitService umjesto IWInitISAPI i iskompajlirati, sada sve radi kako treba !

MyCity » Pascal -> Delphi » Kreiranje servisa

Ko je trenutno na forumu
 

Ukupno su 812 korisnika na forumu :: 87 registrovanih, 6 sakrivenih i 719 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 20624 - dana 04 Apr 2026 04:18

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 357magnum, advokat84, Ba4e, bambulic, bojank, bokisha253, Clouseau, darkojbn, debeli, DeerHunter, Deki Duga Devetka, deki1001, DezurniOperativni, Dimitrije Paunovic, Dioniss, dj.ape, Dorcolac, Dukelander, elviper2, Folkstar, france93, gasazem, Giskard, Gogi_avio, Goksi95, ivan_8282, kaisarevic1, Kobrim, Konda, Kružić, KUZMAR, Laluvr, Levi, lukac, Marko00, MegaVLAdaR, Mercury, Mi lao shu, miki kv, mikrimaus, Mitch22, mixkax, MK10, Moldovan, moldway, monomah, N.e.m.a.nj.a., nebojsag, neko_drugi, Nepopravljivi, nikoladim, nixos, Ns1975, okopanja, oldtimer, pein, Pilence, Podljub, Prečanin30, Prometeus, Qvazimodo, radovanstojkov023, raf87, Raso75, Redred, royst33, Sinduk, Stojan Mrsavi, synergia, tamno.nebo, tecataki, tomigun, ujke, vaci, Velizar Laro, Vlad000, Vlada76, Vojin, vrgudinac, x78186, Zdilar, zemljanin, zgoljo, Zimbabwe, zmajbre, zoran77, Zvonkozvonko