Hej!
Jag vill räkna alla raderna i min databas och sedan multiplicera det med en kolumn i databasen.
Har nu koden:
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=boklager;USER=root;PASSWORD=;OPTION=3;"
set rs = conn.execute("SELECT Count(*) FROM bestallningar")
set rs2 = conn.execute("SELECT * FROM bestallningar")
dim rader
dim manga
dim totalt
rader = rs(0)
manga = rader * rs2("antal")
response.write manga
set conn = nothing
set rs = nothing
set rs2 = nothing
%>
Men får felmeddelandet:
Feltyp:
Körningsfel i Microsoft VBScript (0x800A000D)
Inkompatibla typer
/boklager/stat.asp, line 12
Antar att antal-kolumnen är av typen int och att den innehåller nåt värde.
<%
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;DATABASE=boklager;USER=root;PASSWOR
D=;OPTION=3;"
set rs = conn.execute("SELECT Count(*) FROM bestallningar")
set rs2 = conn.execute("SELECT * FROM bestallningar")
dim rader
dim manga
dim totalt
rader = rs(0)
manga = CInt(rader) * CInt(rs2("antal"))
response.write manga
set conn = nothing
set rs = nothing
set rs2 = nothing
%>
