---
title: "Internet Beats"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/38105-internet-beats"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Vide"
published: "2000-09-09T17:09:00.000Z"
updated: "2000-09-09T17:09:00.000Z"
replies: 0
views: 1008
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/38105-internet-beats"
---

# Internet Beats

## #1 — Vide, 2000-09-09T17:09Z

Har gjort en enkel funktion för att få fram internet tid (Beat). Du anropar tiden med getBeats().

\<font size="1" face="Verdana, Arial, Helvetica, sans-serif"\>Kod:\<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#006666"\>Function getBeats()
	h = Cstr(hour(time)-1)
	If Cstr(h) = "-1" then
		h = "23"
	End If
	m = minute(time)
	s = second(time)
	getBeats = Left(Round(((Cint(h) \* 3600) + (Cint(m) \* 60) + (Cint(s))) \* (1000 / 86400)),3)
End Function

Notera att om du vill använda denna kod i en annan tidszon än den svenska så måste du ändra -1 mot den siffra som motsvarar den nya tidszonen...

Du kan se skriptet live [här](http://www.webeye.nu/). Till höger...

Permalänk: https://www.webforum.nu/p/38105

---

Tråden på webben: https://www.webforum.nu/amne/asp/38105-internet-beats