Jaha, borde inte dessa RecSet fungera?
Alternativ 1:
=============================================
Set RecSet = Connect.Execute("SELECT * FROM gastbok Where Privat = False ORDER BY Dag DESC")
=============================================
Alternativ 2:
=============================================
Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM gastbok Where Privat = False ORDER BY Dag DESC"
Set RecSet = Connect.Execute(SQL)
=============================================
Den gamla hederliga varianten funkar dock:
=============================================
Set RecSet = Server.CreateObject("ADODB.Recordset")
SQL = "SELECT * FROM gastbok Where Privat = False ORDER BY Dag DESC"
RecSet.Open SQL, Connect, adOpenStatic, adLockOptimistic
=============================================
Följande felmeddelande får jag när jag försöker köra de övre två varianterna, jag får inget fel när jag kör den tredje koden:
Körningsfel i Microsoft VBScript (0x800A000D)
Inkompatibla typer: '[string: "--3,33333333333333E-"]'
/majagastbok.asp, line 16
Så här ser koden ut på rad 16 (=sidräknare)
antalsidor=abs(int(Cstr("-"&RecSet.RecordCount/antal)))