Avatar billede puppetmaster Nybegynder
28. marts 2002 - 11:19 Der er 2 kommentarer og
1 løsning

Dial-up/online time

Søges:
En funktion der starter som en service, når computeren starter op, aktiveres når der åbnes en internetforbindelse (Dial-up), starter en timer som kører så længe forbindelsen er åben, gemmer antaller af minutter forbindelsen har været åben og som kan summere antallet af minutter pr. dag.
Avatar billede answermaster Nybegynder
28. marts 2002 - 17:27 #1
Det dér med et program som starter når computeren starter kan man ikke lave i vb, men i windows.

eks.

vælg start + indstillinger + kontrolpanel + planlagte opgaver + kør planlæg ny opgave

Det bruger jeg selv.

Det med internetforbindelsen, ved jeg ikke noget om, men umidbart vil jeg tro at det er umuligt.

:o Answer
Avatar billede sjh Nybegynder
28. marts 2002 - 21:16 #2
Det må være noget i stil med Programmet her:


'----------------------------- Form1 -----------------------------
'Hvis du laver et lille program som starter op sammen med computeren
'du kan ligge det i menu start.
'Hvis du er online poper programmet op og hvis du er offline forsvender det igen.

Option Explicit

Private Declare Function InternetGetConnectedState Lib "wininet.dll" _
                          (ByRef lpSFlags As Long, _
                          ByVal dwReserved As Long) As Long

Public Function Online() As Boolean
  Online = InternetGetConnectedState(0&, 0&)
End Function

Private Sub Form_Load()
  ' Programmet kan kun startes en gang.
  If App.PrevInstance = True Then End
  ' Form1 forsvender
  Me.Hide
  ' timer tid i milisek
  Timer1.Interval = 500
End Sub

Private Sub Timer1_Timer()
  If Online = True Then
    Me.Caption = "du er online."
    ' Form1 poper op
    Me.Show
      Else
    Me.Caption = "du er offline."
    ' Form1 forsvender
    Me.Hide
  End If
End Sub
'----------------------------- Form1 -----------------------------
Avatar billede puppetmaster Nybegynder
29. marts 2002 - 01:02 #3
answermaster, det glemte jeg da helt i skyndingen: jeg bruger Windows 2000 Professional...
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester