---
title: "Division by zero?"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/106783-division-by-zero"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Greven"
published: "2004-07-05T21:19:56.000Z"
updated: "2004-07-09T22:37:45.000Z"
replies: 9
views: 352
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/106783-division-by-zero"
---

# Division by zero?

## #1 — Greven, 2004-07-05T21:19Z

Vad är fel med nedanstående kod? (funkar fin fint lokalt, men på hotellet blir det knas)

\<%
Dim A11, B11
A11 = Rs("plac")
B11 = objrs11("antal")
p11 =Round((a11)/(b11)\*100,0)
%\>

Fel msg:

Microsoft VBScript runtime error '800a000b' 
Division by zero

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

## #2 — Nexus86, 2004-07-05T22:51Z

Det betyder att b11 = 0 och man kan inte dela ett tal med noll.

T.ex
42/0, hur många ggr går 0 in i 42? Jo oändligt. Du kan alltså inte dela ett tal med 0.

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

## #3 — Greven, 2004-07-06T06:42Z

Okej  ;) 

Men kan du förklara varför det funkar lokalt och på dknet, men inte loopia?

Kan detta funka bättre?

\<%
IF objrs11("antal") = 0 THEN
Dim A11, B11
A11 = Rs("plac")
B11 = objrs11("antal")
p11 =Round((a11)/(b11)\*100,0)
END IF
%\>

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

## #4 — Engine^, 2004-07-06T06:59Z

Ehh... den koden kommer alltid att ge division by zero.

```
<%
If Not Rs.EOF Then
  A11 = Rs("plac")
Else
  A11 = 0
End If

If Not objrs11.EOF Then
  If Not objrs11("antal") = 0 Then
    B11 = objrs11("antal")
  Else
    B11 = 1
  End If
Else
  B11 = 1
End If

p11 = Round(a11 / b11 * 100, 0)
```

Ytterligare en anledning till att det inte fungerar kan vara att objrs11 eller Rs är tomma.

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

## #5 — Greven, 2004-07-06T20:23Z

Problemet är visst att objrs11("antal") är '0' på loopia... men lokalt och på dknet får 'antal' ett värde...

Vad kan vara fel?

```
<%
SQL = "SELECT Count(*) AS antal FROM " & request.querystring("ar") & " where datum like '" & request.querystring("ar") _
& "%' and enamn='" & rs("enamn") & "' AND fnamn='" & rs("fnamn") & "'"
set objRS11 = MinCon.Execute(SQL)
%>

<%
Dim a11, b11
If Not Rs.EOF Then
  A11 = Rs("plac")
Else
  A11 = 0
End If

If Not objrs11.EOF Then
  If Not objrs11("antal") = 0 Then
    B11 = objrs11("antal")
  Else
    B11 = 1
  End If
Else
  B11 = 1
End If

p11 = Round(a11 / b11 * 100, 0)
%>
```

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

## #6 — Greven, 2004-07-07T16:02Z

Är det SQL-satsen som är felkomp.? 

Finns det någon annan lösning där man räknar antal unika fall?

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

## #7 — Peeer, 2004-07-07T16:09Z

Finns det några poster i databsen som uppfyller villkoren då? Kör du med en databas lokalt/dknet och en annan på loopia?

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

## #8 — Greven, 2004-07-07T17:13Z

Jag kör med exakt samma databas, lokalt, dknet och på loopia... mkt skumt  :r

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

## #9 — Greven, 2004-07-09T10:30Z

```
SQL = "SELECT Count(*) AS antal FROM " & request.querystring("ar") & " where  enamn='" & rs("enamn") _
& "' AND fnamn='" & rs("fnamn") & "'"
```

Tog bort 'datum' i where-satsen  ;)

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

## #10 — Calevan, 2004-07-09T22:37Z

> **Nexus86 skrev:**
>
> Det betyder att b11 = 0 och man kan inte dela ett tal med noll.
> 
> T.ex
> 42/0, hur många ggr går 0 in i 42? Jo oändligt. Du kan alltså inte dela ett tal med 0.

förlåt, men jag kunnde inte låta detta passera obemärkt. att säga att 42/0 skulle vara lika med oändligheten är inte helt korrekt.

om du vill kan du läsa mer här:
<http://www.math.su.se/~jesper/research/wheels/easy.pdf>
tar upp lite av problemet och en lösning på att dela med noll

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/106783-division-by-zero