🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: free.it.visual-basic
Article #2818

Re: Beep

#2818
From: fama1979
Date: Mon, 27 Jan 2003 09:19
11 lines
1421 bytes
Per far suonare lo speaker basta l'API beep

Declare Function Beep Lib "kernel32" Alias "Beep" (ByVal dwFreq As Long,
ByVal dwDuration As Long) As Long

per suonare dei file con la scheda audio usa PlaySound

Declare Function PlaySound Lib "winmm.dll" Alias "PlaySoundA" (ByVal
lpszName As String, ByVal hModule As Long, ByVal dwFlags As Long) As Long

ciao
Technical Details
Message-ID: <tQ6Z9.119296$AA2.5087024@news2.tin.it>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-01!sn-xit-09!supernews.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!news.mailgate.org!nntp.infostrada.it!news-out.tin.it!news-in.tin.it!news2.tin.it.POSTED!not-for-mail
References: <IZTY9.49272$ZE.1381564@twister2.libero.it>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f94ee,a3d10ca45abbc19e
X-Google-Attributes: gidf94ee,public
X-Google-ArrivalTime: 2003-01-27 01:20:09 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-01!sn-xit-09!supernews.com!news.maxwell.syr.edu!newsfeed.icl.net!newsfeed.fjserv.net!news.mailgate.org!nntp.infostrada.it!news-out.tin.it!news-in.tin.it!news2.tin.it.POSTED!not-for-mail
From: "fama1979" <fama1979@email.it>
Newsgroups: free.it.visual-basic
References: <IZTY9.49272$ZE.1381564@twister2.libero.it>
Subject: Re: Beep
Lines: 13
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <tQ6Z9.119296$AA2.5087024@news2.tin.it>
Date: Mon, 27 Jan 2003 09:19:21 GMT
NNTP-Posting-Host: 80.117.219.165
X-Complaints-To: newsmaster@tin.it
X-Trace: news2.tin.it 1043659161 80.117.219.165 (Mon, 27 Jan 2003 10:19:21 MET)
NNTP-Posting-Date: Mon, 27 Jan 2003 10:19:21 MET
Organization: TIN