Inlägg
Re: Vad tycks om sidan?
Ursprungligen inskrivet av sinnan
Detta är bara en sida för dem som inte e så bra på ASP m.m. inte så avancerad
´
Ett stort tips är att kolla alla felstavningar...
t.ex -> t.ex.
igentligen -> egentligen
Annars -> annars (mitt i en mening)
ju -> (talspråk)
asp -> ASP
application -> applikation (Svensk stavning)
Detta är bara några som jag såg när jag skummläste Tutorials - Nybörjare.
//Mikael
Problem med Paralellport
Hej!
Håller på att bygga ett inbrottsalarm med en mikroswitch och har tänkt koppla denna till datorn via Paralellporten. När strömmen bryts (mikroswitchen öppnas) så ska datorn känna av detta. Frågan jag har är hur jag ska kunna programmera VB 6.0 att läsa av paralellporten. Jag har Något kallat DLPortIO men jag får inte riktigt koden att funka.
Min kod:
Dim Value As Long
If DLPortIO.DlPortReadPortBufferUchar(Val("&H301"), 0, 0) = 16 Then
DLPortIO.BAS (inkluderad och fin)
'****************************************************************************
'* @doc INTERNAL
'* @module dlportio.bas |
'*
'* DriverLINX Port I/O Driver Interface
'* <cp> Copyright 1996-1999 Scientific Software Tools, Inc.<nl>
'* All Rights Reserved.<nl>
'* DriverLINX is a registered trademark of Scientific Software Tools, Inc.
'*
'* Win32 Prototypes for DriverLINX Port I/O
'*
'* @comm
'* Author: RoyF<nl>
'* Date: 09/26/96 14:08:58
'*
'* @group Revision History
'* @comm
'* $Revision: 2 $
'* <nl>
'* $Log: /DLPortIO/API/DLPORTIO.BAS $
'
' 2 3/03/99 5:25p Kevind
' Removed any reference for customer to call us when encountering bugs,
' also removed our old address info.
'
' 1 9/27/96 2:03p Royf
' Initial revision.
'*
'****************************************************************************
Public Declare Function DlPortReadPortUchar Lib "dlportio.dll" (ByVal Port As Long) As Byte
Public Declare Function DlPortReadPortUshort Lib "dlportio.dll" (ByVal Port As Long) As Integer
Public Declare Function DlPortReadPortUlong Lib "dlportio.dll" (ByVal Port As Long) As Long
Public Declare Sub DlPortReadPortBufferUchar Lib "dlportio.dll" (ByVal Port As Long, Buffer As Any, ByVal Count As Long)
Public Declare Sub DlPortReadPortBufferUshort Lib "dlportio.dll" (ByVal Port As Long, Buffer As Any, ByVal Count As Long)
Public Declare Sub DlPortReadPortBufferUlong Lib "dlportio.dll" (ByVal Port As Long, Buffer As Any, ByVal Count As Long)
Public Declare Sub DlPortWritePortUchar Lib "dlportio.dll" (ByVal Port As Long, ByVal Value As Byte)
Public Declare Sub DlPortWritePortUshort Lib "dlportio.dll" (ByVal Port As Long, ByVal Value As Integer)
Public Declare Sub DlPortWritePortUlong Lib "dlportio.dll" (ByVal Port As Long, ByVal Value As Long)
Public Declare Sub DlPortWritePortBufferUchar Lib "dlportio.dll" (ByVal Port As Long, Buffer As Any, ByVal Count As Long)
Public Declare Sub DlPortWritePortBufferUshort Lib "dlportio.dll" (ByVal Port As Long, Buffer As Any, ByVal Count As Long)
Public Declare Sub DlPortWritePortBufferUlong Lib "dlportio.dll" (ByVal Port As Long, Buffer As Any, ByVal Count As Long)
Felmeddelande = "Expected Function or Variable på rad If DLPortIO..."
Vore tacksam för svar!
- 7 / 6 Rykte: Sony ruvar på PC-version av The Last of Us Part II 16
- 6 / 6 Enkelt knep öppnar gamla Utforskaren i Windows 11 19
- 6 / 6 Microsoft återstartar Windows 10-betatester 45
- 5 / 6 Ikea vill servera virtuella köttbullar i Roblox 21
- 2 / 6 Nvidia bygger AI-spelassistent som körs på grafikkortet 30
- Elbilar - Tråden för intresserade23362
- Bygga högtalare1
- Helgsnack: Var det sämre förr?64
- En fråga ang Odyssey OLED G8 och Nvidia4
- Hej! vad skulle ni vädera denna dator?2
- Formel 1-tråden9120
- Dagens fynd — Diskussionstråden49910
- Tråden om PlayStation 514803
- Datorskärm startar om när min TV används?0
- Microsoft släpper guide till nycklar i Windows8
- Säljes Custom Loop - i9-9900K / 32 GB / 2 TB / RTX 3080 / Win 11
- Säljes Kontorsrensning - Auktion - Multipla varor.
- Bytes LG 65” OLED *C1* bytes mot en 55”
- Säljes 32 GB (2x16) DDR5 6400mt/s cl32 Kingston Fury Renegade
- Säljes Overkill 19" brandväggsbygge - 2*10Gb, E3-1225 v5, 32GB DDR4
- Säljes Passiva vattenkylningsflänsar
- Köpes Lenovo Legion Go defekt reservdel
- Säljes XFX MERC 310 7900 XTX 24GB
- Säljes Nyköpt AM5 och 7800X3D-paket
- Säljes i7-4790K / GTX 980ti / 16 GB RAM / SSD 250 GB
Tester av chassi, grafikkort, processorer m.m.
- SweClockers Noobbyggarguide - Del 6: Den grafiska finalen4
- Musmatta med trådlös laddning – Dålig på det mesta7
- Duellen: Premium-kylare vs. budgetfavorit25
- SweClockers Noobbyggarguide - Del 5: Kabelkrångel3
- SweClockers Noobbyggarguide - Del 4: Aggressivt aggregat8
- Årets bästa soundbar – vi väljer favoriterna78
- Snabba upp din gamla dator med uppgradering67
- SweClockers Noobbyggarguide - Del 3: Den dramatiska moderkortsmonteringen12
- Snabbtest: Steam Deck överraskar som arbetsdator31
- Snabbtest: 3DMark Steel Nomad – visuellt avancerat, förvånansvärt lättdrivet82