File will not close.
 

News:

29 December 2022 - PtokaX 0.5.3.0 (20th anniversary edition) released...
11 April 2017 - PtokaX 0.5.2.2 released...
8 April 2015 Anti child and anti pedo pr0n scripts are not allowed anymore on this board!
28 September 2015 - PtokaX 0.5.2.1 for Windows 10 IoT released...
3 September 2015 - PtokaX 0.5.2.1 released...
16 August 2015 - PtokaX 0.5.2.0 released...
1 August 2015 - Crowdfunding for ADC protocol support in PtokaX ended. Clearly nobody want ADC support...
30 June 2015 - PtokaX 0.5.1.0 released...
30 April 2015 Crowdfunding for ADC protocol support in PtokaX
26 April 2015 New support hub!
20 February 2015 - PtokaX 0.5.0.3 released...
13 April 2014 - PtokaX 0.5.0.2 released...
23 March 2014 - PtokaX testing version 0.5.0.1 build 454 is available.
04 March 2014 - PtokaX.org sites were temporary down because of DDOS attacks and issues with hosting service provider.

Main Menu

File will not close.

Started by Shurlock, 17 November, 2004, 00:44:58

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

Shurlock

Hi, can anyone tell me why the file that is being read and closed will not let itself be deleted?
Manual delete will create an error 'The file is being used....".

A similar script in another function works perfectly.
Only difference with that other function is that this file should only be deleted if vUser is online and has been sent the message (WatchMess)

function CheckWatch(curUser)
	local WatchFile = "Watch/"..curUser.sName..".txt"
	local MessSent = 0
	if readfrom(WatchFile) ~= nil then
		readfrom(WatchFile)
		local line = read()
		local _,_,tmpOP,tmpDate,tmpReason = strfind(line, "(.*)|(.*)|(.*)|")
		local vUser = GetItemByName(tmpOP)
		if vUser then
			local WatchMess = "\r\n\t*** On "..tmpDate.." you have asked to watch the arrival of "..curUser.sName
			WatchMess = WatchMess.."\r\n\t*** Reason: "..tmpReason
			WatchMess = WatchMess.."\r\n\t*** The user has just entered the hub. :) "
			SendPmToNick(vUser.sName, BotName, WatchMess)
			MessSent = 1
		end
	end
	readfrom()
	if MessSent == 1 then
		remove(WatchFile)
	end
	return 1
end

Any help is appreciated!  Thnx.
If it's raining and your roof leaks, fix the roof. DON'T try to stop the rain!!

SMF spam blocked by CleanTalk