Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
Windows Oturumu Açılmadan Program Nasıl Çalışır
#11
(18-01-2019, Saat: 14:33)okoca Adlı Kullanıcıdan Alıntı:
(18-01-2019, Saat: 14:31)theSinan Adlı Kullanıcıdan Alıntı: Hocam Ben  Uygulamayı C++ ile Kodluyorum
Pascaldan anlamıyorum Smile
Birde Uygulama Görevi icra ederken Birkaç iş Yapıyor
MSSQL,   Yedeklerken Sunucuya Bağlanma İşlemi Oluyor
MYSQL yedeklerken Sitemde Kurulu Mysql buluyorum (MYSQL yedeklemeyi mysqldump  ile yapıyorum)
FireBird Yedeklerken Sistemde Kurulu Firebird Versiyonunu buluyorum
Yedeği Aldıktan Sonra Zipliyor
Ziplediğini FTP Protokolu ile Sunucuya Atıyor
Görevin Sonunda Müşteriye Mail Atıyor
yine Müşterinin Cep Telefonuna Mesaj Atıyor
Saklama Süresi Biten Yedekleri Hem Localden Hem FTP den Siliyor
İşlemler ile ilgili Rapor Oluşturuyor
Bunları Servis Uygulaması için Yazmam Çok Zor

Bu uğraşlar Yerine Programımı Oturum Açılmadan Çalıştırabilirsem Sorunum çözülecek
Görev Zamanlayıcı ya görevi bir Bat dosyası ile ekleyebilir miyim acaba
Yardımlarınız İçin Allah razı olsun


https://www.sevenforums.com/tutorials/12...-task.html


when the computer start,
run whether user is logged on or not, vs
seçip biraz incelemelisin denemelisin.

Windows 10 işletim sisteminde Administrator kullanıcı bilgileri ile görev oluşturdum sorunsuz çalışıyor yedek alıp mesaj attı 
Windows 7 de normal user ile denedim uygulama çalışmadı
 Windows 7 de ve server işletim sistemlerinde administrator kullanici bilgileri ile deneyeceğim 
Windows 10 da administrator ile çalıştığına göre diğerlerine de çalışacaktır inşallah 
Yarın deneyebilirsem sonucu buraya yazacağım inşallah 
Yardımlarınız için allah razı olsun
Cevapla
#12
S.a
Görev Zamanlayıcı
Görev Oluşturup
Program Windows Açılışında Windows Oturum Açılmasa Bile Program Açılıyor
İşletim Sistemi farketmiyor
Görevi Oluşturuken
Kullanıcı Oturum Açmışsa da açmamışsa da  Çalıştır
Seçiyorum
Administrator Kullanıcı ve Şifresini Giriyorum
Sorunsuz Çalışıyor
Ancak Sorun Administrator Şifresi Değiştiğinde
Görev Artık Çalışıyor
Görev Zamanlayıcı
Yerinde Windows Servis Yazmam Gerektiğini geçde olsa anladım
Windows Servis  Açılışta İstediğim Uygulamayı başlatması benim için yeterli olacaktır
Denemek için
Windows Servis Projesi Açtım
ancak Windows Servisteki Execute Metodu yada Start Eventlerinde hiç bişey çalıştıramadım
Create Metodu Çalışıyor
O da Sadece Projeyi Oluştururken Tetikleniyor
Bana Gerekli olan Windows Açılırken Start Metodunda İşlem Yapmam gerekmiyormu
Nerde Hata yapıyorum Acaba
Basit Bir Foksiyon ile Deneme Yapayım Dedim
Fonksiyonum

void __fastcall TService1::KAYDET(String islem)
{
  TIniFile *AyarKayit;
 try
 {
   try
      {
        AyarKayit = new TIniFile(GetHomePath()+"\\Ayar.ini");
        AyarKayit->WriteString("Program_Ayarlar",islem,"İslem : "+islem+ " Tarih : "+FormatDateTime("dd-mm-yyyy hh:nn:ss",Now()));
      }
      catch(Exception *HATA)
      {
      //----
      }

    }
    __finally
   {
   AyarKayit->Free();
    }
}


Start Metodunda Fonksiyonu Çalıştırmak için

AYAR_KAYDET("Start");

Create Metodunda Fonksiyonu Çalıştırmak için

AYAR_KAYDET("Create");

Yazdım
Projeyi Derlediğimde
Create Metodu Çalışıyor Sorun yok
İnstall Edip Stop Start ettiğimde Çalışmıyor
Bilgisayarı Yeniden Başlattığımda da Çalışmıyor
Nedeni ne olabilir acaba
Yardımlarınız için Allah Razı Olsun
Cevapla
#13
Merhaba.

- Başka bir bakış açısı sunmak isterim. Kendi çalıştığım kurumda bu şekilde yapıyorum. Her ne kadar UPS'e bağlı olsa da windows güncellemeleri ve/veya uzaktan isteyerek kapat aç yaptığımda işime yarıyor.

- Tabi bu önerim, eğer ki server sizin kontrolünüzde ise. Exclamation

- SERVER bilgisayarınızı otomatik oturum açar şekilde ayarlayın ( netplwiz.exe ) otomatik olarak oturum açılması için login name ve password girmeniz, otomatik olarak açılması için gerekli onay kutusunu  işaretlemeniz gerekiyor.

- Oturum açılınca sizin projeniz otomatik çalışacaktır.

- Bir vbs dosyasını da açılışta çalışmak üzere çalışacaklar listesine ekleyin. ( visual basic script ) tek satır kod yazın kod şu.

WScript.CreateObject("WScript.Shell").Run("rundll32 user32.dll,LockWorkStation")

Neden vbs script, dilerseniz Delphi ile de yapabilirsiniz.

function LockWS: Boolean;
type
 TLockWorkStation = function: Boolean;
var
 hUser32: HMODULE;
 LockWorkStation: TLockWorkStation;
begin
 hUser32 := GetModuleHandle('USER32.DLL');
 if hUser32 <> 0 then
 begin
   @LockWorkStation := GetProcAddress(hUser32, 'LockWorkStation');
   if @LockWorkStation <> nil then
   begin
     LockWorkStation;
     Result := True;
   end;
 end;
end;

- Ben şahsen tek satır kodluk vbs'yi tercih ettim. Her exe dosyası Bilgi Teknolojileri departmanı ve virüs denetim yazılımları için imza ve cevap hakkı isteyen bir unsur olduğundan.


Vel hasıl, bilgisayar açılır açılmaz hem oturum kilitlenir, hem de proje(ler)iniz çalıştığı için ne isterseniz yapabilirsiniz. 

Idea
Saygılarımla
Muharrem ARMAN

guplouajuixjzfm15eqb.gif
Cevapla
#14
(13-04-2019, Saat: 12:37)mrmarman Adlı Kullanıcıdan Alıntı: Merhaba.

- Başka bir bakış açısı sunmak isterim. Kendi çalıştığım kurumda bu şekilde yapıyorum. Her ne kadar UPS'e bağlı olsa da windows güncellemeleri ve/veya uzaktan isteyerek kapat aç yaptığımda işime yarıyor.

- Tabi bu önerim, eğer ki server sizin kontrolünüzde ise. Exclamation

- SERVER bilgisayarınızı otomatik oturum açar şekilde ayarlayın ( netplwiz.exe ) otomatik olarak oturum açılması için login name ve password girmeniz, otomatik olarak açılması için gerekli onay kutusunu  işaretlemeniz gerekiyor.

- Oturum açılınca sizin projeniz otomatik çalışacaktır.

- Bir vbs dosyasını da açılışta çalışmak üzere çalışacaklar listesine ekleyin. ( visual basic script ) tek satır kod yazın kod şu.

WScript.CreateObject("WScript.Shell").Run("rundll32 user32.dll,LockWorkStation")

Neden vbs script, dilerseniz Delphi ile de yapabilirsiniz.

function LockWS: Boolean;
type
 TLockWorkStation = function: Boolean;
var
 hUser32: HMODULE;
 LockWorkStation: TLockWorkStation;
begin
 hUser32 := GetModuleHandle('USER32.DLL');
 if hUser32 <> 0 then
 begin
   @LockWorkStation := GetProcAddress(hUser32, 'LockWorkStation');
   if @LockWorkStation <> nil then
   begin
     LockWorkStation;
     Result := True;
   end;
 end;
end;

- Ben şahsen tek satır kodluk vbs'yi tercih ettim. Her exe dosyası Bilgi Teknolojileri departmanı ve virüs denetim yazılımları için imza ve cevap hakkı isteyen bir unsur olduğundan.


Vel hasıl, bilgisayar açılır açılmaz hem oturum kilitlenir, hem de proje(ler)iniz çalıştığı için ne isterseniz yapabilirsiniz. 

Idea

Merhaba hocam 
Yardımın için allah razı olsun 
Server kontrolü bizde değil malesef
Server bilgisayar müşterilerin kontrol de onlara ait
Ancak bilgi herzaman lazım olacak birşey
Ögrenmenin zararı yok
vbs dosyasını açılışa ekledik 
Her oturum açtıgımızda çalışmayacak mı
Her çalıştıgında oturum kilitlenecek mi
Yani biz istediğimiz zaman nasıl oturum açacağız 
Yada
Vbs dosyasını sadece parolasız oturum açmak istediğimiz hesap için mi açılışta çalıştıracagız
Windows serviste start metoduna gelince
Neden çalıştıramıyorum çok garip
Yarın Başka birşey içinde Windows servis yazmam gerekirse yine önüme engel çıkacaktır
Hatamı bulmam lazım
Cevapla
#15
vbs sadece açık oturumu kilitliyor. Yani oturum açık ama üçüncü şahısların erişimini engelliyor. Üçüncü şahısların kendi oturumunu açmasına engel yok. Sizin oturum paralel/komşu oturum olarak çalışır durumda oluyor. 

Yazılım dili önemli değil, projeniz sistem uygulaması olmak zorunda da değil. 

Oturumu açan netplwiz, kapatmayıp kilitleyen vbs
Saygılarımla
Muharrem ARMAN

guplouajuixjzfm15eqb.gif
Cevapla
#16
(14-04-2019, Saat: 00:05)mrmarman Adlı Kullanıcıdan Alıntı: vbs sadece açık oturumu kilitliyor. Yani oturum açık ama üçüncü şahısların erişimini engelliyor. Üçüncü şahısların kendi oturumunu açmasına engel yok. Sizin oturum paralel/komşu oturum olarak çalışır durumda oluyor. 

Yazılım dili önemli değil, projeniz sistem uygulaması olmak zorunda da değil. 

Oturumu açan netplwiz, kapatmayıp kilitleyen vbs

Sanırım anladım hocam allah razı olsun
Cevapla
#17
benimde bu konuda bir uğraşım var yazdığım programın oturum açma ekranından önce gelmesini istiyorum ya da bilgisayar başlatılsa bile otomatik çalışmasını istiyorum konu hakkında nasıl bir yol izlemeliyim siz sorunu nasıl çözdünüz
Cevapla


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
  [ÇÖZÜLDÜ] macos işletim sistemine program yazmak shooterman 5 445 02-02-2024, Saat: 09:54
Son Yorum: shooterman
  Windows XP; Win32 uygulaması geçerli değil! delphi.developer 1 191 24-01-2024, Saat: 22:32
Son Yorum: enigma
  Uygulamaya responsive görünüm nasıl kazandırabilriz ? delphicim 0 200 04-01-2024, Saat: 15:24
Son Yorum: delphicim
  Delphi 7 ye göre MB Döviz kurları nasıl alırız maydin60 7 962 31-12-2023, Saat: 02:18
Son Yorum: maydin60
  program exe icon sorunu cvheneburi 9 2.722 19-10-2023, Saat: 15:04
Son Yorum: harunyl



Konuyu Okuyanlar: 1 Ziyaretçi