Klasöre kullanıcı bazlı bağlantı kurma

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
Kullanıcı avatarı
serbek_tr
Üye
Mesajlar: 362
Kayıt: 16 Ağu 2004 12:54

Klasöre kullanıcı bazlı bağlantı kurma

Mesaj gönderen serbek_tr »

S.A.
Arkadaşlar sorumu nasıl soracağım bilmiyorum oyüzden yapmak istediğimi anlatıyorum. Program içinden server üzerinde bir klasöre dosya kopyalayacağım bu işi yapabilmek için server üzerinde o klasörü paylaşıma açmam gerekli dolayısı ile ulaşılabilir olacak. ancak şöyle birşey yapmam gerekli sadece program a özel bir kullanıcı açacağım ve tam yetki olacak program içinde bu klasöre dosya kopyalarken o klasöre istediğim kullanıcı adı ile bağlanma imkanım varmı. Sorunumu anlatabildiysem önerebileceğiniz daha başka bir mantık varmı
Procedure Forum.Imza(Sender: TObject)
Begin
ShowMessage('Her türlü fikire, Her zaman açığım')
End;
Kullanıcı avatarı
Commandx
Üye
Mesajlar: 183
Kayıt: 01 Oca 2008 05:34

Re: Klasöre kullanıcı bazlı bağlantı kurma

Mesaj gönderen Commandx »

anlattığınız işlemler bir işletim sisteminin dosya kontrolü veya shell erişimi gibi kodlarıyla ilgili
yani bir işletim sistemi yazmak gibi bir şey
zaten client server işlemleri başlı başına bir mini işletim sistemi sayılabilir
dosya kopyalama için ayrı bir kod
dosya silmek için ayrı bir kod
dosya taşımak için ayrı bir kod
dosyaya yazma hakkı için ayrı bir kod
erişim hakkı için ayrı bir kod
dosya bilgilerinin kullanıcıya iletilmesi için ayrı bir kod
dosya üzerinde bazı değişiklik yapmak için ayrı bir kod
kullanıcı ara yüzünü oluştırmak için ayrı bir kod
servera güncelleme dosya transferi yapmak için ayrı bir kod
sağ click için ayrı bir kod
sol click için ayrı bir kod
Dbl click için ayrı bir kod
vs.. vs...
yani uzak bir serverde yapılan her türlü işlem aslında kendi bilgisayarınızda simule edilir
simule edilen (yani canlandırma) işlemler bir stringe atanarak socketten internete gönderilir
alıcı taraftaki bilgisayar gelen bu stringi if else yordamlarında değerlendirerek
silme yapıştırma , kesme ,kopyalama, adüzeltme sağ click, sol click gibi işlemleri orda gerçekleştirir.

yani biz burda sağ click yaptığımızda mesela "sagclick" adında bir string internete uzaktaki ilgili bilgisayarın portuna yazılır
server yüklü bilgisayardaki yazılım "sagclick" stringini alır if socket.receivetext = sagclick then begin
mouse_event(MOUSEEVENTF_RIGHTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_RIGHTUP, 0, 0, 0, 0);
gibi bir komut satırını çalıştırı
eğer ordaki görüntüyü görebilirsek oraya sağ clicklediğimizi sanırız
http://www.delphibasics.co.uk/RTL.asp?Name=DaysBetween
http://www.neonhaber.com/Static/mega-co ... index.html
www.delphican.con
Function PARSE( text, ilk, son:String ): String; //
begin
Delete(Text, 1, pos(ilk, Text) + Length(ilk)-1);
Result := Copy(Text, 1, Pos(Son, Text)-1);
end;
Cevapla