Skrivrättigheter?

kanske kan vara nat?
http://www.w3schools.com/asp/prop_attributes.asp
ska ge ut om filen ar s k "Read-Only" file, annars inte med if-sats om det ar sa du menar ;)

crisse6 skrev:

kanske kan vara nat?
http://www.w3schools.com/asp/prop_attributes.asp
ska ge ut om filen ar s k "Read-Only" file, annars inte med if-sats om det ar sa du menar ;)

det är precis vad jag menar :) ska testa när jag kommer hem! tack!!

Tror inte att det funkar. Read-Only är ju bara ett filattribut och inget som säger att användaren har skrivrättighet eller inte på vald mapp/fil

cya,
PatrikB

hmm.. okej.. inte testat det ännu men om en fil är Read-only så man man väll inte skriva till den?

Det är skillnad på skrivskydd och skrivrättigheter (om man inte kör FAT). En användare som har skrivrättigheter på en fil har som default också rätt att ta bort skrivskydd. Och har man inte skrivrättigheter från början så är ju skrivskyddet onödigt? Vad är det du vill uppnå?

jag vill kolla om ett script kan skriva till en textfil

testa att skriva till text-filen ... blir det fel så funkar det inte ... inget fel ... det funka :e

cya,
PatrikB

en lösningn men inte den jag vill ha. jag vill att man ska få ett meddelande innan man skriver till filen så att det inte blir några fel.

PatrikBs förslag är bra.

ForAppending=8
set FSO = Server.CreateObject("scripting.FileSystemObject") 
on error resume next
Set f =FSO.OpenTextFile ("c:\whatever\whatever.txt", ForAppending, false)
select case err.number
case 0
	'Vi får skriva. Skriv!
case 53 'File not found
	'Filen fanns inte. Gör nåt!
case 70 'Permission denied
	'Vi får inte skriva. Låt bli att skriva och visa felmeddelande!
case else
	'Nåt annat gick fel. Låt bli att skriva och visa felmeddelande!
end select
on error goto 0
' osv ..

Du kan ju göra om den till en funktion om du vill.

hmm. okej, man kan alltså kolla det innan man skriver nått, så blir det perfa ;) Tack så mycket!

jaha, jag och FSO ;)

kör med:

Set objFSO = Server.CreateObject("scripting.FileSystemObject") 
		On Error Resume Next
		Set objFile = objFSO.OpenTextFile(Server.MapPath("include/dbconfig.asp"), 2, False)
			If Err.Number <> 0 Then
				Response.Write "Obs! Filen <b>include/dbconfig.asp</b> måste gå att skriva till."
			End If
		Set objFile = Nothing
	Set objFSO = Nothing

men om det inte blir nått fel så tömmer den hela filen, det ska den inte ;)

My misstake. Jag har ändrat däruppe.

tack, ska testa.. *tur att man hare en kopia för det va rätt mycket kod* ;)

Caveat Emptor :OO