---
title: "Två frågor: en databas och en FSO"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/14132-två-frågor-en-databas-och-en-fso"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "Cy-4"
published: "2002-02-01T17:33:00.000Z"
updated: "2002-02-01T18:02:00.000Z"
replies: 3
views: 224
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/14132-två-frågor-en-databas-och-en-fso"
---

# Två frågor: en databas och en FSO

## #1 — Cy-4, 2002-02-01T17:33Z

Hallå!

Jag har två frågor. Hoppas någon kan hjälpa mig:

1: Vad är det för fel på denna kod:

```
Set objDatabas = Server.CreateObject("ADODB.Connection")
objDatabas.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& strMdbFilePath

Set objRecset = Server.CreateObject("ADODB.Recordset")

sqlGettopic = "SELECT Topic, Viewed FROM Forum_topic WHERE ID = " & intGetRefid
objRecset.Open sqlGettopic, objDatabas, 3, 3

'Kollar om man ska lägga till ett på antalet gånger 
'tråden är läst och gör det om det ska göras
If Request.Querystring("add") = "1" Then

objRecset("Viewed") = objRecset("Viewed") + 1
objRecset.Update

End If
```

Får detta felmeddelandet:
Error Type:
Microsoft JET Database Engine (0x80040E09)
Cannot update. Database or object is read-only.
/egen_X/includes/forum_subs.asp, line 592

Rad 592 är:
objRecset("Viewed") = objRecset("Viewed") + 1

2: Den här koden funkar inte heller som den ska:

```
Set textfil = FSO.OpenTextFile("c:\inetpub\wwwroot\ag_deblock\total.txt")

intTotalCounter = Cint(textfil.ReadLine)
intTotalCounter = intTotalCounter + 1

textfil.Close

Set textfil = FSO.CreateTextFile("c:\inetpub\wwwroot\ag_deblock\total.txt", True)
textfil.WriteLine intTotalCounter
```

Felmeddelande:
Error Type:
Microsoft VBScript runtime (0x800A0046)
Permission denied
/ag_deblock/deblocker.asp, line 31

Rad 31 är:
Set textfil = FSO.CreateTextFile("c:\\inetpub\\wwwroot\\ag_deblock\\total.txt", True)

Hoppas att nåfon kan hjälpa mig dessa problem.

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

## #2 — Vide, 2002-02-01T17:56Z

Har du satt skrivrättigheter på mapparna? Det måste du har.

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

## #3 — LarsG, 2002-02-01T18:00Z

Fel och fel, jag skulle ha skrivit databaskoden så här

```
'Kollar om man ska lägga till ett på antalet gånger 
'tråden är läst och gör det om det ska göras
If Request.Querystring("add") = "1" Then
   Set objDatabas = Server.CreateObject("ADODB.Connection")
   objDatabas.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& strMdbFilePath
   objDatabas.execute "update forum_topic set viewed = viewed + 1 where id = " & intGetRefid,,128
   objDatabas.close
   set objDatabas = nothing
end if
```

FSO-fallet ser ut som om du (IUSR\_\<servername\> är det väl egentligen) inte har rättigheter att skapa filer. Det får du ändra med utforskaren. Det kan också vara samma problem med mdb-filen.

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

## #4 — Cy-4, 2002-02-01T18:02Z

Tack för svaren, ska genast kolla om jag får det att funka. Får jag inte det så återkommer jag.

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

---

Tråden på webben: https://www.webforum.nu/amne/asp/14132-två-frågor-en-databas-och-en-fso