/ 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
Check for at se om trådløsnetværk er tilgæ~
Fra : Michael K. Therkilds~


Dato : 09-02-04 20:11

Jeg er ved at lavet et registrerings program i VB6 (bliver måske ændret til
VB .NET), systemet går ud på at der skal indtastes nogle produktions data
forskellige steder i firmaet. Systemet kommer til at køre på en bærbar, som
kobles på vis et trådløst netværk.

Er det muligt at checke hvornår netværket er tilgængelig? evt. hvordan?



 
 
Kim Pedersen (09-02-2004)
Kommentar
Fra : Kim Pedersen


Dato : 09-02-04 22:52

> Er det muligt at checke hvornår netværket er tilgængelig? evt. hvordan?

Selvfølgelig. Og det er faktisk temmeligt nemt. Det gøres således:

Indsæt følgende i "General Declarations" i en form eller modul (skriv
PRIVATE foran begge linier hvis du sætter det ind i en form)

Declare Function GetSystemMetrics Lib "user32" (ByVal nIndex As Long) As
Long
Const SM_NETWORK = 63

Herefter kan du fra et vilkårlig sted i koden finde ud af om der er tilgang
til et netværk med koden:

If GetSystemMetrics(SM_NETWORK) Then
' Der er netværk tilgængeligt
Else
' Der er ikke noget netværk
End If

Der bliver kun undersøgt om netværket er tilgængeligt eller ej, men ikke
hvilken type af netværk (det kan både være trådløst eller via netkabel).

Hilsen Kim Pedersen
http://www.vbcodemagician.dk



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

Månedens bedste
Årets bedste
Sidste års bedste