Cint fejl
Jeg tester på en pws, men kan man ikke bruge funktionen Cint her ?Jeg får følgende fejl:
Der opstod en Microsoft VBScript-kørselsfejl fejl \'800a01ca\'
Variablen bruger en Automation-type, der ikke understøttes i VBScript: \'Cint\'
/Booking/Lokaler/SletLokale2.asp, linje 20
Når jeg kører koden:
LID = request.querystring(\"LID\")
\'Connection til Personaleaendringernes database paa Sql-Serveren
Set conn = Server.CreateObject(\"ADODB.Connection\")
conn.open \"DSN=BookingData;uid=sa;pwd=;APP=BookingDB;Database=BookingDB\"
sql = \"SELECT COUNT(*) AS Nummer FROM LokalerKombi WHERE LID=\" & LID
set rs = conn.execute(sql)
AntalTupler = rs(\"Nummer\")
Cint(AntalTupler) \'Linie 20
response.write AntalTupler & \"<br>\"
if AntalTupler > 1 then
response.write \"Lokalet ingår i en Lokalekombination. Slet kombinationen før du sletter lokalet.\"
elseif (AtalTupler < 1) then
response.write \"Der opstod en fejl: \" & AntalTupler
else
response.write \"<h3>Lokalet er slettet</h3>\"
end if
rs.close
conn.close
Koden skulle vel være god nok, men skal man installere noget specielt for at bruge funktionen Cint ?
Jeg har prøvet Clng uden held. Samme fejlmeddelelse.
