| Author |
 Topic  |
|
TERM
New Member
82 Posts |
 Posted - 12 January 2003 : 17:57:57
|
quote:
Server object error 'ASP 0177 : 800a0046'
Server.CreateObject Failed
/testboard/admin_config_sitestat.asp, line 55
The operation completed successfully.
This is my error, any idea what the problem is? I really really want this mod on my site, I am getting over 400,000 page views a month and want to actually start recording this information with my forums as well.
Im trying to get the txt file working cause it takes less space, I tried putting the path in two different ways;
url: http://wwww.domain.com/forum/sitestat.txt
FTP: /d:/FTPINFO/SITES/DOMAIN/sitestat.txt
and yes the folder its in does have read/write permissions. |
 |
|
|
rgrund
Junior Member
Austria
206 Posts |
Posted - 13 January 2003 : 02:40:06
|
Hi,
the path should only be
d:\FTPINFO\SITES\DOMAIN\sitestat.txt
This you will set in the admin sectionof the site statistic in the field "Path of the sitestat.txt:"
Waiting for feedback!
Robert
|
Internet should be OPENSOURCEd! |
|
|
|
TERM
New Member
82 Posts |
Posted - 13 January 2003 : 19:21:59
|
| same error. should I put it into a different folder? I have it in my forum folder. |
|
|
|
rgrund
Junior Member
Austria
206 Posts |
Posted - 14 January 2003 : 09:15:47
|
Hi,
how about puting it into the folder where the database is. This is how I tried it on my system.
Robert |
Internet should be OPENSOURCEd! |
|
|
|
TERM
New Member
82 Posts |
Posted - 14 January 2003 : 17:56:07
|
| Same error again. I am very certain my host gave me full permissions to everything, so read/write is allowed everywhere, I have other scripts on my page that write to both DB's and txt files, so it must be something in that file. But I dont understand that error. |
|
|
|
TERM
New Member
82 Posts |
Posted - 14 January 2003 : 18:41:54
|
quote:
if Request.Form("Method_Type") = "Write_Configuration" then
Err_Msg = ""
if not Isnumeric(Request.Form("strVisitorCountEdit")) then
Err_Msg = Err_Msg & "<li>You can only enter numbers in the Edit Visitor Counter</li>"
end if
if not Isnumeric(Request.Form("strPageCountEdit")) then
Err_Msg = Err_Msg & "<li>You can only enter numbers in the Edit Page Counter</li>"
end if
If Request.Form("strCounterDB")="0" then
'We check if the file exists in the path specified
set fso = server.createobject("Scripting.FileSystemObject")
set file = fso.OpenTextFile(strCounterTxtPath,2,true)
If Not fso.FileExists(strCounterTxtPath) then
Err_Msg = Err_Msg & "<li>The Path you have specified for the storage place, does not include the file!</li>"
End If
file.close: set file = nothing: set fso = nothing
End If
If Not Right(Request.Form("strCounterTxtPath"),12)="sitestat.txt" then
Err_Msg = Err_Msg & "<li>The Filename has to be sitestat.txt</li>"
End if
Thats lines 40-65 on the admin_config_sitestat.asp.
I talked with the server admin and he double checked my site and said permissions are set to full for my entire site, so its not that, however he isn't sure if maybe it is the server itself. Was this code created to work on NT4.0 and IIS4.0 ???
Thats what the server my site is hosted on is, its an old server obviously, but it might answer that. Also if it is written to run on new servers, how would I change it, or would that involve re-writing the entire code? |
|
|
|
TERM
New Member
82 Posts |
Posted - 14 January 2003 : 19:47:52
|
Update on error. I did not want to put the sitestat() on my default page, I just want it as a private feature for myself. I guess I should have realized that myself. However, now there is another problem.
I can set up the .txt file now, and it says configured properly (or something like that) and I put it on the default.asp for now, not sure exactly how to create a totally different page to link it too, but that can come later. Anyways now I get this error when trying to open the testboard itself.
quote:
Server object error 'ASP 0177 : 800a003e'
Server.CreateObject Failed
/testboard/inc_sitestat.asp, line 160
The operation completed successfully.
here are lines 150-169 of the inc_sitestat.asp
quote:
'#########################################################
'We open the sitestat.txt if it does not exist
'#########################################################
strSS_Now = Now()
strSS_Year = "Y" & Year(strSS_Now)
strSS_Month = "M" & Month(strSS_Now)
strSS_Day = "D" & Day(strSS_Now)
set fso = server.createobject("Scripting.FileSystemObject")
set file = fso.OpenTextFile(strCounterTxtPath,1,true)
lines = split(file.readall(), vbCrLf)
file.close: set file = nothing: set fso = nothing
for i = 0 to ubound(lines)-2
If i = 0 then
content = lines(i)
ELseIf i = ubound(lines)-2 then
content = content & lines(i)
else
content = content & lines(i)
End if
Its basically the same error as I was getting before, so any idea what this is? The way the mod is set up now, is exactly as the instructions have stated word for word. Before it was just missing the Default.asp code. |
|
|
|
archer_g
Starting Member
22 Posts |
Posted - 14 January 2003 : 20:00:26
|
using access 2000 couldn't get the dbs files to work so I set the table up manually
Im getting this error any ideas whats wrong?
ADODB.Field (0x800A0BCD)
Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record.
/forum/inc_sitestat.asp, line 302
Browser Type:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)
Page:
GET /forum/default.asp |
|
|
|
betheball
Starting Member
USA
41 Posts |
Posted - 15 January 2003 : 09:45:51
|
I was able to get rid of the EOF or BOF error by going into config.asp and moving the following code:
strTotalDayVisitor = Application(strCookieURL & "STRTOTALDAYVISITOR")
strTotalMonthVisitor = Application(strCookieURL & "STRTOTALMONTHVISITOR")
strTotalYearVisitor = Application(strCookieURL & "STRTOTALYEARVISITOR")
strTotalVisitor = Application(strCookieURL & "STRTOTALVISITOR")
strDayCount = Application(strCookieURL & "STRDAYCOUNT")
strMonthCount = Application(strCookieURL & "STRMONTHCOUNT")
strYearCount = Application(strCookieURL & "STRYEARCOUNT")
strTotalCount = Application(strCookieURL & "STRTOTALCOUNT")
strVisitorCountEdit = Application(strCookieURL & "STRVISITORCOUNTEDIT")
strPageCountEdit = Application(strCookieURL & "STRPAGECOUNTEDIT")
strSiteStatTableBorder = Application(strCookieURL & "STRSITESTATTABLEBORDER")
strCounterDB = Application(strCookieURL & "STRCOUNTERDB")
strCounterDisplay = Application(strCookieURL & "STRCOUNTERDISPLAY")
strCounterTxtPath = Application(strCookieURL & "STRCOUNTERTXTPATH")
strTotalYesterDayVisitor = Application(strCookieURL & "STRTOTALYESTERDAYVISITOR")
strYesterDayCount = Application(strCookieURL & "STRYESTERDAYCOUNT")
strSiteStatMembers = Application(strCookieURL & "STRSITESTATMEMBERS")
strHeaderPage = Application(strCookieURL & "STRHEADERPAGE")
strHeaderVisitor = Application(strCookieURL & "STRHEADERVISITOR")
strHeaderMembers = Application(strCookieURL & "STRHEADERMEMBERS")
and placing it directly under:
strShowPaging = Application(strCookieURL & "STRSHOWPAGING")
My stats now show as long as I use the DB. If I use the .txt file, I get the following error on the page showing the stats:
Server object error 'ASP 0177 : 800a003e'
Server.CreateObject Failed
/oamforum/forum/inc_sitestat.asp, line 357
The operation completed successfully.
|
- Duane
"So I got that going for me, which is nice." - Carl Spackler |
|
|
|
rgrund
Junior Member
Austria
206 Posts |
Posted - 15 January 2003 : 11:15:25
|
Hi Term,
is the sitestat.txt file empty?
The sitestat.txt should at least have two lines as in the zip file!
Term and betheball : I have to check at home what the code : 800a003e' stands for. Will get back asap tonight!
Robert
|
Internet should be OPENSOURCEd! |
|
|
|
rgrund
Junior Member
Austria
206 Posts |
Posted - 15 January 2003 : 11:18:03
|
archer_g,
how many value fields do you have now in the forum_sitestat table? They should be 6 in total or in other words you should have ten fields within the table.
Robert |
Internet should be OPENSOURCEd! |
Edited by - rgrund on 15 January 2003 13:00:26 |
|
|
|
rgrund
Junior Member
Austria
206 Posts |
Posted - 15 January 2003 : 12:51:16
|
Hi,
the code 800A003E stands for "input past end of file" . Honestly I do not know what that means. Will search to get a better understanding.
So this is what the 800A003A stands for:
The path to the file is not correct! and the file can not be found. Are you both sure that the path is correct?
Robert |
Internet should be OPENSOURCEd! |
Edited by - rgrund on 15 January 2003 13:23:03 |
|
|
|
rgrund
Junior Member
Austria
206 Posts |
Posted - 15 January 2003 : 15:34:47
|
Hi,
this is only for those who have problems with the storage option which uses the txt file:
Download the following zip file www.gcsk.com/snitz_mod/sitestat111.zip and overwrite the two files within the zip file with the ones in the forum root.
Go then to the admin section and choose the "site statistic" section.
If you think that your path to the sitestat.txt is correct press "Submit New Config". the script will now check if the path and the file exists! You will get an error message if it does not and you will need to change your entry.
I tried this out on my test site and everything worked. I got all the error message if the file did not exist and all the files work perectly if it does.
please let me know if you have still any problems.
Robert |
Internet should be OPENSOURCEd! |
|
|
|
TERM
New Member
82 Posts |
Posted - 15 January 2003 : 18:20:31
|
I can't even use the page at all, wherever I try to enter the page from it gives me this error
Server object error 'ASP 0177 : 800a003e'
Server.CreateObject Failed
/testboard/inc_sitestat.asp, line 168
The operation completed successfully.
so I will need to re-install the board first before I can test this fix you posted.
|
|
|
|
archer_g
Starting Member
22 Posts |
Posted - 15 January 2003 : 18:38:55
|
quote:
Originally posted by rgrund
archer_g,
how many value fields do you have now in the forum_sitestat table? They should be 6 in total or in other words you should have ten fields within the table.
Robert
I have the 10 fields
my vbscript/sql aint that good what about doing this clears the error up to the next statement, its not as though your circling through a couple of thousand records because if my thinking is correct its all fixed on the year and should only pull the stats out for that one year added the red lines
If strCounterDB = "1" then
'We get the data from the Database
strSS_Now = Now()
strSS_Year = Year(strSS_Now)
strSS_Month = Month(strSS_Now)
strSS_Day = Day(strSS_Now)
'We get the Total Count
If strTotalCount = "1" then
strSql = "SELECT Sum(SITESTAT_MONTH_COUNT) AS Total_Count FROM " & strMemberTablePrefix & "SITESTAT"
set rs = my_conn.execute(strSql,adOpenStatic,adCmdTxt)
Total_Count=rs("TOTAL_COUNT") + strPageCountEdit
End if
'We get the Total Year Count
If strYearCount = "1" then
strSql = "SELECT Sum(SITESTAT_MONTH_COUNT) AS Year_Count FROM " & strMemberTablePrefix & "SITESTAT WHERE (((SITESTAT_YEAR)="& strSS_Year & "))"
set rs = my_conn.execute(strSql,adOpenStatic,adCmdTxt)
while not rs.eof
Year_Count=rs("Year_COUNT")
rs.movenext
wend
End If
'We get the Total Month Count
If strMonthCount = "1" then
strSql = "SELECT SITESTAT_MONTH_COUNT AS Month_Count FROM " & strMemberTablePrefix & "SITESTAT WHERE (((SITESTAT_YEAR)=" & strSS_Year & ") AND ((SITESTAT_MONTH)=" & strSS_Month &"))"
set rs = my_conn.execute(strSql,adOpenStatic,adCmdTxt)
while not rs.eof
Month_Count=rs("Month_COUNT")
rs.movenext
wend
End If
'We get the Total Day Count
If strDayCount = "1" then
strSql = "SELECT SITESTAT_DAY_COUNT AS Day_Count FROM " & strMemberTablePrefix & "SITESTAT WHERE (((SITESTAT_YEAR)=" & strSS_Year & ") AND ((SITESTAT_MONTH)=" & strSS_Month & ") AND ((SITESTAT_TODAY)=" & strSS_Day & "))"
set rs = my_conn.execute(strSql,adOpenStatic,adCmdTxt)
while not rs.eof
DAY_Count=rs("DAY_COUNT")
rs.movenext
wend
End If
'We get the Total YesterDay Count
If strYesterDayCount = "1" then
strSql = "SELECT SITESTAT_YESTERDAY_COUNT AS YesterDay_Count FROM " & strMemberTablePrefix & "SITESTAT WHERE (((SITESTAT_YEAR)=" & strSS_Year & ") AND ((SITESTAT_MONTH)=" & strSS_Month & ") AND ((SITESTAT_TODAY)=" & strSS_Day & "))"
set rs = my_conn.execute(strSql,adOpenStatic,adCmdTxt)
while not rs.eof
YESTERDAY_Count=rs("YESTERDAY_COUNT")
rs.movenext
wend
End If
'_____________
'We get the Total Visit
If strTotalVisitor = "1" then
strSql = "SELECT Sum(SITESTAT_MONTH_VISITOR) AS Total_Visit FROM " & strMemberTablePrefix & "SITESTAT"
set rs = my_conn.execute(strSql,adOpenStatic,adCmdTxt)
while not rs.eof
Total_Visit=rs("TOTAL_VISIT") + strVisitorCountEdit
rs.movenext
wend
End If
'We get the Total Year Visit
If strTotalYearVisitor = "1" then
strSql = "SELECT Sum(SITESTAT_MONTH_VISITOR) AS Year_Visit FROM " & strMemberTablePrefix & "SITESTAT WHERE (((SITESTAT_YEAR)="& strSS_Year & "))"
set rs = my_conn.execute(strSql,adOpenStatic,adCmdTxt)
while not rs.eof
Year_VISIT=rs("Year_Visit")
rs.movenext
wend
End If
'We get the Total Month Visit
If strTotalMonthVisitor = "1" then
strSql = "SELECT SITESTAT_MONTH_VISITOR AS Month_Visit FROM " & strMemberTablePrefix & "SITESTAT WHERE (((SITESTAT_YEAR)=" & strSS_Year & ") AND ((SITESTAT_MONTH)=" & strSS_Month &"))"
set rs = my_conn.execute(strSql,adOpenStatic,adCmdTxt)
while not rs.eof
Month_Visit=rs("Month_VISIT")
rs.movenext
wend
End If
'We get the Total Day Visit
If strTotalDayVisitor = "1" then
strSql = "SELECT SITESTAT_DAY_Visitor AS Day_Visit FROM " & strMemberTablePrefix & "SITESTAT WHERE (((SITESTAT_YEAR)=" & strSS_Year & ") AND ((SITESTAT_MONTH)=" & strSS_Month & ") AND ((SITESTAT_TODAY)=" & strSS_Day & "))"
set rs = my_conn.execute(strSql,adOpenStatic,adCmdTxt)
while not rs.eof
DAY_Visit=rs("DAY_Visit")
rs.movenext
wend
End If
'We get the Total YesterDay Visit
If strTotalYesterDayVisitor = "1" then
strSql = "SELECT SITESTAT_YESTERDAY_Visitor AS YesterDay_Visit FROM " & strMemberTablePrefix & "SITESTAT WHERE (((SITESTAT_YEAR)=" & strSS_Year & ") AND ((SITESTAT_MONTH)=" & strSS_Month & ") AND ((SITESTAT_TODAY)=" & strSS_Day & "))"
set rs = my_conn.execute(strSql,adOpenStatic,adCmdTxt)
while not rs.eof
YESTERDAY_Visit=rs("YESTERDAY_Visit")
rs.movenext
wend
End If
Else
|
Edited by - archer_g on 15 January 2003 19:38:44 |
|
|
|
Topic |
|
Topic Locked
