excel dosyasını kopyalamaya karşı güvenlik

neo · 2 Mart 2005

:hey: herkese merhaba dostlar

dostlar EFM2005.XLS bir dosyam var bunun başka bir ortama komyalanmasını önlemek mümkünmüdür yani bir diskete yada hard diskin herhangi bir yerine kopyalanmasını engellemek istiyorum birde dosyanın adının değiştirilmesini engellemek mumkünmü saygılarımla

leventm not:soru tarafımdan "diğer excel soruları" başlığı altına taşınmıştır.

danersin · 2 Mart 2005

İstedikleriniz excel ile yapılabilecek şeyler değil.
Excel'de kodlar ancak dosya açık olduğu zaman çalışır.
Ancak dosyanızın başka bilgisayarlarda çalışmaması için bazı şeyler yapılabilir.

birol_mumcu · 2 Mart 2005

merhaba;
başka bir fikir vermesi için
benimde bir yerden edindiğim (yanılmıyorsam sitemizden) kodlar aşağıdadır.
Mesela bu program CD-Rom ismini kontrol ediyor ve tutmuyorsa dosya açmayı iptal ediyor.
CD-Rom a özel bir isim vermemiş iseniz, CD-Rom dahi herhangi bir dosyayıda kontrol ettirebilirsiniz, eğer o dosya yoksa program kapanır.
Kod:
Sub auto_open()
Dim fso, drv, cdr

Set fso = CreateObject("Scripting.FileSystemObject")
For Each drv In fso.Drives
If drv.driveType = 4 Then Set cdr = drv
Next

If cdr.volumename <> "CD nin adı" Then
MsgBox "Lütfen program cd sini takmadan programı çalıştırmayınız"
ThisWorkbook.Close False
End If

End Sub

not: bilgiler paylaşıldıkça güzeldir :bravo:
kolay gelsin

neo · 4 Mart 2005

bu söylediğiniz olayı hardiskte herhangi bir dosyanın içinde bir dosyanın olup olmaması şeklinde ayarlanabilirmiyiz

birol_mumcu · 7 Mart 2005

neo' Alıntı:
bu söylediğiniz olayı hardiskte herhangi bir dosyanın içinde bir dosyanın olup olmaması şeklinde ayarlanabilirmiyiz

DAHA AÇIKLAYICI BİLGİ LÜTFEN

neo · 7 Mart 2005

Ã?rnek

Mesala C:\ içinde mesele sirket.txt dosyası varsa çalışsın yoksa kayıt kulanıcısı değilsiniz diye mesaj versi ve excel dosyasını açması

saygılarımla

Haluk · 7 Mart 2005

Re: Ã?rnek

neo' Alıntı:
Mesala C:\ içinde mesele sirket.txt dosyası varsa çalışsın yoksa kayıt kulanıcısı değilsiniz diye mesaj versi ve excel dosyasını açması

saygılarımla

Ekli dosya, C:\Sirket.txt dosyasının olup olmamasına göre açılır veya açılmaz.

inFiesta · 7 Mart 2005

Raider, verdiğin güzel bir örnek. Peki txt dosyasından veri okutabilirmiyiz. Yani mesela txt dosyasının ilk 6 hanesi 123456 ise açılsın, değilse açılmasın gibi. Veya belki bunun txt değilde excel dosyası olanı da olabilir.

Haluk · 7 Mart 2005

Merhaba;

.....
Yani mesela txt dosyasının ilk 6 hanesi 123456 ise açılsın, değilse açılmasın gibi.
.....

Ekli zip dosyasını açıp, içindeki Sirket.txt doyasını C:\Sirket.txt olarak bilgisayarınıza kaydettikten sonra deneme yapın.

Muhtemelen XL dosyası açılacaktır . :mrgreen:

Daha sonra, bu XL dosyasını kapatın ve C:\Sirket.txt dosyasını açıp, 1nci satırın ilk 6 karakterini değiştirin (123456 yerine örneğin 123856 gibi...) ve XL dosyasını tekrar açmayı deneyin.

İstediğinize yakın bir şey olmuştur umarım.

Levent Menteşoğlu · 7 Mart 2005

Sn Raider

Excelin güvenlik seviyesini yukarı çekerek, makroları devre dışı bırakıp dosyayı açmak mümkün,bunun içinde bir tedbir öngörülebilirmi? örneğin dosyayı şifrelemek bir çözüm olabilirmi?

inFiesta · 7 Mart 2005

Sayın Raider, Teşekkürler.
Tam istediğim gibi.

Haluk · 7 Mart 2005

leventm' Alıntı:
........
örneğin dosyayı şifrelemek bir çözüm olabilirmi?
......

3ncü gruplara ait yazılımlar dışında yapılabilecek tek şey, dosyaya bir tane boş sayfa ilave edip esas sayfaları xlVeryHidden olarak gizlemek ve ancak şartlar sağlandığında dosya açılırsa, boş sayfayı gizleyip diğerlerini görünür hale getirmek ile ilgili bir VBA prosedürünü de kodlara ilave etmek .......... bir dereceye kadar faydalı olabilir.

Ancak, bu da VBA'i az ~ çok bilen birisi tarafından bile rahatlıkla aşılabilir.

Excel'de sayfaların şifreleme algoritması çok zor olmadığından, VBA ile bile çözülebilmektedir. Ancak, dediğiniz gibi dosya açmaya 6-7 karakterlik şifre konulursa (dosya açma - koruma şifrelemesinin encryption'ı, sayfa koruma şifrelemeye göre çok daha yüksektir), en azından dosya açma şifresini bulmak isteyen kişinin PC'si biraz ısınabilir işte.... :mrgreen:

Unutmamak gerekir ki, Microsoft hiçbir zaman Excel'i güvenlikli bir yazılım olarak lanse etmemiştir. Yaptığı hesaplar, grafikler ve sonuçları ..... güvenli olmakla beraber, şifreleri güvenlikli değildir. 3ncü gruplara ait yazılımlarla şifreler rahatlıkla çözülebilmektedir.

Kaldı ki, bu tür ücretli şifre çözücü programların lisans şifrelerinin bile internet ortamında bedavaya bulunabildiği bir ortamda, bir Excel dosyasının "güvenlikli" olmasından bahsetmek ...... veya dosyanın VBA ile "güvenlik" sağlamayı düşünmek bana göre boş .... ama ufukları açması bakımından da hoş bir düşünceden öteye gidemez. :mrgreen:

Genellikle ofis ortamlarında, sayfa koruma ve / veya dosya açmak için şifre koymak, sorunları çözmeye yeterlidir. En azından, yetkisiz veya bilinçsiz Excel kullanıcılarının hazırladığınız dosyayı bozmasına epeyce engel olur.

Yani bu konuda bana göre en son nokta, yukarıdaki alıntıda bahsettiğiniz gibi dosyanın kendisine bir açma şifresi konulmasıdır.

@inFiesta;
Ã?rnek dosyanın işinize yaradığına sevindim.

neo · 16 Mart 2005

:hey: bu olay çok mükemmel arkadaşlar
ben birşey daha merak ettim bu txt dosyasının içine yazacağımız verinin excel da sayfa 1 içinde a1 hücresinin içine yazsak şirket txt dosyasının içine yazmasını sağlamak mümkünmüdur

birol_mumcu · 23 Mart 2005

MERHABA;

neo' Alıntı:
bu söylediğiniz olayı hardiskte herhangi bir dosyanın içinde bir dosyanın olup olmaması şeklinde ayarlanabilirmiyiz

syn neo
bu mesajı özel mesaj olarakta yollamışsınız.
konu ile ilgili sorunuzu syn raider'in harika cevabı yanıtlamıştır umarım
http://www.excel.web.tr/viewtopic.php?t=2806&highlight=koruma
linkinde
ve de mesajlarınızı özel (yanlışlıkla olduğunu düşünüyorum)göndermemeye özen gösterelim ki verilen cevaplardan ve örnek çalışmalardan tüm forumdaşlar faydalansın :arkadas:
kolay gelsin

damra2005 · 5 Mayıs 2005

Sn Raider Benim kendi belgemde
Sub Aut

pen ()
Sheet ("Sayfa1").Selecet
End Sub

diye makrom var. Yazmış olduğun makronun adı da aynı bunları nasıl birleştirebilir. birde kendi makromu silip seninkini yerleştirdiğimde ambiguous name......... : auto_open diye mesaj gelip dosya açılıyor

recep · 7 Mayıs 2005

bir de böyle dene. istediğin olacaktır
makronun içindekileri sil ve bu kodları yapıştır. :hey: :hey: :hey:

Const strTxtFile As String = "C:\Sirket.txt"
Const MyCheckVal As Long = 123456
'
Sub Aut

pen()
Sheet ("Sayfa1").Selecet
Dim InputData As Variant
Dim FileNum As Long
Dim x As Integer
FileNum = FreeFile
If Dir(strTxtFile) <> Empty Then
Open strTxtFile For Input As FileNum
x = x + 1
Do While Not EOF(FileNum)
Line Input #FileNum, InputData
If Left(InputData, 6) <> MyCheckVal Then GoTo NoGo:
If x = 1 Then Exit Sub
Loop
Close FileNum
ThisWorkbook.IsAddin = False
Else
NoGo:
ThisWorkbook.IsAddin = True
MsgBox "Kayitli kullanici degilsiniz....", vbCritical, "Kullanicinin dikkatine !"
ThisWorkbook.Close SaveChanges:=False
End If
End Sub
'

selections · 7 Mayıs 2005

Bu tip koruma isteklerinde database olarak bir çalışma kitabı kodların çalıştığı başka bir çalışma kitabı kullanmanız biraz daha güvenli olur kodların çalışacağı kitabın açılışta harddisk seri numarasını kontrol etmesi kopyalamayı, başka bir kitabı database olarak kullanmanız makroları etkisiz yapması halinde bilgilerinize ulaşmasını zorlaştırır eğer bunları yapabiliyorsa zaten sizinde yapacak çok şeyiniz yok demektir. Ayrıca Allah hırsızı kapıya getirmesin geldiğinde girer.

vanhelsing · 3 Eylül 2007

Sayın Haluk ;

Haluk' Alıntı:
Merhaba;

Ekli zip dosyasını açıp, içindeki Sirket.txt doyasını C:\Sirket.txt olarak bilgisayarınıza kaydettikten sonra deneme yapın.

Muhtemelen XL dosyası açılacaktır . :mrgreen:

Daha sonra, bu XL dosyasını kapatın ve C:\Sirket.txt dosyasını açıp, 1nci satırın ilk 6 karakterini değiştirin (123456 yerine örneğin 123856 gibi...) ve XL dosyasını tekrar açmayı deneyin.

İstediğinize yakın bir şey olmuştur umarım.

Sayın Haluk ;
Forumu Araştırırken yukarı daki sizin dosyanızı buldum bunu kitap açılıpta kitabın içinde ki sayfalar da seçim yaparak yetkisiz kullanıcıların o sayfayı veya sayfaları açmalarını engellemek mümkün olurmu
şimdiden teşekkürler

cocoa35 · 6 Eylül 2007

sayın haluk bey;
Forumu dolaşırken sizin hazırlamış olduğunuz kod'ları gördüm ve bir konuda yardımınızı istiyorum.Benimde excel ortamında hazırladığım bir program dosyası var.ben bu dosyayı istiyen kişilere cd ile gönderip bilgisayarlarına kopyalamasını ancak benim vermiş olduğum kod olmaksızın o bilgisayarda programın çalışmasının engellenmesini istiyorum.
Ayrıca yollamış olduğum kod ile programın çalışması sağlansa bile programın o bilgisayardan başka cd,yada hard disc'e kopyalanmasını engellemek istiyorum.bu konuda yardımcı olabilirmisiniz?

baydeniro · 25 Kasım 2007

Arkadaşlar Sayın üstat Haluk konuyu gayet güzel açıklamış. Excel netice itibarıyla koruma açısından diğer programlama olanaklarına göre daha zayıf bir program. Üstelik VBA yı iyi bilenler şifrelerini de çözebildiğine göre yapacak fazla bir şey kalmıyor. Öte yandan konu hakkında etik olarak şunu düşünüyorum : İster firmada çalışalım, isterse programı satalım veya bir şekilde paylaşalım, koruma önlemleri bilgilere değil formüllere-makrolara zarar vermeli ki yani o programı normal olarak kullanan kişi verileri kaybetmesin.

Benim tahminim, hacker düzeyinde birisi bir excel dosyasının programlaması ile uğraşmaz. Yapılması gerekeni zaten kendisi de yapabilir. Önemli olan; verilere bir zeval gelmesin.

excel dosyasını kopyalamaya karşı güvenlik

neo

danersin

birol_mumcu

neo

birol_mumcu

neo

Haluk

Özel Üye

inFiesta

Haluk

Özel Üye

Levent Menteşoğlu

Administrator

inFiesta

Haluk

Özel Üye

neo

birol_mumcu

damra2005

recep

selections

vanhelsing

cocoa35

baydeniro