Skušební verze   zodpovězená otázka

VB6/VBA

11. 6. 2009 16:52

anonym
 

217.196.213.168

Nevíte jak ve Vb6 udělat zkušební verzi programu? Třeba nějak omezit dobu fungování nebo počet zpuštění atd.
nahlásit spamnahlásit spam -1 / 1 odpovědětodpovědět

11. 6. 2009 21:47

Tomáš Herceg
 

Hodnocení 1847     Příspěvků 3847

Při instalaci nebo prvním spuštění programu si někam uložíte datum a při spuštění programu zkontrolujete, jestli od toho data uběhlo 30 dní.

Otázkou je, kam datum uložit - do souboru, do registrů, jinam? Záleží, jakou spolehlivost a ochranu požadujete. Vždy to jde prolomit, minimálně změnou systémového data a času, jediné, co můžete udělat, je to člověku zkomplikovat.
nahlásit spamnahlásit spam 0 odpovědětodpovědět

12. 6. 2009 7:19

anonym
 

217.196.213.168

Tet mě napadlo nešlo by nějak třeba udělat žeby program po spuštění musel najit soubor "www.webovastranka.cz/nazevsouboru.txt"

a pokud by se nepodařilo ho najít nebo by byl vypnutý internet tak by se nespustil. To by nikdo ovlivnit už asi nemohl kromě autora progamu který by měl přístup k tomu ftp.

Vůbec ale nevím jestli něco takového jde udělat.
nahlásit spamnahlásit spam 0 odpovědětodpovědět

12. 6. 2009 8:32

Tomáš Herceg
 

Hodnocení 1847     Příspěvků 3847

Udělat to jde, ale zaprvé to nebude fungovat, když je člověk offline, a za druhé běžný uživatel to sice neprolomí, ale kdekdo by to obešel bez problémů. Stačí v souboru hosts někde ve Windows říct, že webovastranka.cz = nějaký jiný webový server (klidně třeba localhost) a na tom dát soubor k dispozici. Windows pak všechny požadavky na tento server přesměruje na můj vlastní, kde soubor můžu mít navždy a bude to fungovat.
nahlásit spamnahlásit spam 0 odpovědětodpovědět

12. 6. 2009 12:15

Ondřej Ondryáš
 

Hodnocení -5     Příspěvků 242

Třeba si někam uložit txt kam by se vždy kládalo aktální datum, pokud by soubor neexistoval program by se nezapl a kdyby to datum které se zapsalo nebylo po popořadě (například 1.1.2

009 a potom třeba 5.6.2007 nebo třeba 7.8.2010) tak by se program taky nezapl (Třeba byvyhodil chybu takto (možnost neexistujcího souboru):

If Not IO.File.Exist(c:\soubor.txt) Then
If MsgBox(Soubor programu porušen, MsgBoxStyle.YesNo) = DialogResult.Yes Then
Exit Sub
End If
End If

)

Odepřete práva zápisu (teď nevím jak)

Doufám že něco z tohopomůže.

PS:píše se "Zkušební verze"
nahlásit spamnahlásit spam 0 odpovědětodpovědět

12. 6. 2009 12:16

Ondřej Ondryáš
 

Hodnocení -5     Příspěvků 242

Omlouvám se za ten kód, přehlédl jsme že to chcete pro vb6 které neumím vůbec ale snad to taky půjde ne?(to řešení né kód)
nahlásit spamnahlásit spam 0 odpovědětodpovědět

12. 6. 2009 12:29

anonym
 

217.196.213.168

ten program který tvořím je zaměřený spíš na skupinu lidí která nedokáže něco takového obějít a ten program stejně je na netu závislý. Zvládl by jste udělat ten script? byl bych vděčný kdybyste ho udělal a dal sem

nahlásit spamnahlásit spam 0 odpovědětodpovědět

12. 6. 2009 13:17

Tomáš Herceg
 

Hodnocení 1847     Příspěvků 3847

Psát vám ho tady nejspíš nikdo nebude, na to tady nikdo nemá čas. Poradíme vám rádi, jak to udělat, ale když jenom sedíte a rozdáváte úkoly, tak to není ten správný přístup.

Ve VB6 se pravda s Internetem dělá trochu jinak - do Toolboxu si musíte přidat komponentu Microsoft Internet Transfer Control, tu přidat na formulář, a stáhnout ji. Příklad máte třeba zde: http://programujte.com/?akce=diskuze&kam...

A pokud můžu doporučit, přejděte na nějakou novější verzi Visual Basicu, třeba Visual Basic 2008 Express. VB6 je přes 10 let stará hrůza.
nahlásit spamnahlásit spam 0 odpovědětodpovědět

12. 6. 2009 13:20

anonym
 

217.196.213.168

díky za rady
nahlásit spamnahlásit spam 0 odpovědětodpovědět

22. 7. 2011 15:10

Karol
 

Hodnocení -3     Příspěvků 54

Ja som to vyriesil takto.

Dim x As Long


Private Sub Timer1_Timer()
d1 = "22.7.2011"
    x = DateDiff("d", Now, d1)
    If x <= 0 And x >= -30 Then
    Else
    MsgBox "Vyprsala skusobna doba softweru! " & PrtNumb, vbCritical, "Chyba"
    End
    End If
End Sub
program pokracuje
...
...
...

nahlásit spamnahlásit spam -1 / 3 odpovědětodpovědět

22. 7. 2011 15:37

Ondřej Linhart
 

Hodnocení -553     Příspěvků 3274

Tak tenhle kód si zasluhuje čestné místo v Hall of Shame...
nahlásit spamnahlásit spam 1 / 1 odpovědětodpovědět
                       
Nadpis:
Antispam: Komu se občas házejí perly?
Příspěvek bude publikován pod identitou   anonym.
  • Administrátoři si vyhrazují právo komentáře upravovat či mazat bez udání důvodu.
    Mazány budou zejména komentáře obsahující vulgarity nebo porušující pravidla publikování.
  • Pokud nejste zaregistrováni, Vaše IP adresa bude zveřejněna. Pokud s tímto nesouhlasíte, příspěvek neodesílejte.

přihlásit pomocí externího účtu

přihlásit pomocí jména a hesla

Uživatel:
Heslo:

zapomenuté heslo

 

založit nový uživatelský účet

zaregistrujte se

 
zavřít

Nahlásit spam

Opravdu chcete tento příspěvek nahlásit pro porušování pravidel fóra?

Nahlásit Zrušit

Chyba

zavřít

feedback