/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Re: Elektronisk Pin-Kode husker
Fra : Mathias


Dato : 17-10-03 20:00

"R2-D2" <junk@mail.com> wrote in
news:3f357b2e$0$24651$edfadb0f@dread14.news.tele.dk:

> Er der nogle der har lavet en elektronisk pin-kode-husker, som man
> lige kan skrive ud ?

Jeg har lavet "en ny tråd", da den gamle er lidt gammel.

<code>
Option Explicit
Const PinCodeFile As String = "C:\MinPinkode.txt" 'Fil med din pinkode
Dim S As String
Dim S2 As String

Private Sub Form_Load()
Open PinCodeFile For Input As #1
Do Until EOF(1) = True
Line Input #1, S
S2 = S2 & S & vbCrLf
Loop

'Fjerner sidste linieskift lavet
'af ovenstående kode:
S2 = Left(S2, Len(S2) - 2)
Text1.Text = ""
Text1.Text = S2
End Sub
</code>

Jeg kan bare ikke lave en kode der laver en ny fil, hvis PinCodeFile ikke
findes.

 
 
Mathias (17-10-2003)
Kommentar
Fra : Mathias


Dato : 17-10-03 20:02

Mathias <mathias@nonne.tld> wrote in
news:Xns9417D5B3872425q738hgq@212.54.64.134:

> Jeg har lavet "en ny tråd", da den gamle er lidt gammel.

Næh, det virkede ikke...

Søg
Reklame
Statistik
Spørgsmål : 177557
Tips : 31968
Nyheder : 719565
Indlæg : 6408877
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste