Hej. Jeg forstår ikke hvorfor jeg får denne fejl.
Microsoft VBScript runtime error '800a01a8'
Object required: '[string: "select * From Privat"]'
/administrator.asp, line 604
dim strBody, strHeader, strRadio, strSelectTable, strSelectEmail, strID
strHeader = request.Form("strFormHeader")
strBody = request.Form("strFormBody")
strRadio = request.Form("strFormRadio")
if strRadio = "1" then
strSelectEmail = "Pemail"
strSelectTable = "Privat"
strID ="Pid"
ELSEIF strRadio = "2" THEN
strSelectEmail = "Femail"
strSelectTable = "Firma"
strID = "Fid"
end if 'strRadio = 1 then
set rs = ("select * From "&strSelectTable&" where Nyhedsbrev=FALSE") >>>(LINIE 604)<<<
response.write rs