"
tblout = tblout & "| " & Trim(Left(firstSplit(x), 5)) & " | "
tblout = tblout & "" & Trim(Mid(firstSplit(x), 6, 6)) & " | "
tblout = tblout & "" & pc & " | "
tblout = tblout & "" & dt & " | "
tblout = tblout & "" & Trim(Mid(firstSplit(x), 41)) & " | "
tblout = tblout & "
" & vbCrLf
End If
Next
tblout = tblout & ""
makeTBLtvcom = tblout
End Function
%>
<%
Function getLastMod(file2check)
Dim objFSO
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set f = objFSO.GetFile(Server.MapPath( file2check ))
fModDate = WeekdayName(WeekDay(f.DateLastModified), True)_
& ", " & Day(f.DateLastModified)_
& " " & MonthName(Month(f.DateLastModified), True)_
& " " & Year(f.DateLastModified)_
& " " & Hour(f.DateLastModified)-5 & ":00"
getLastMod = fModDate
End Function
%>
<%
'does user like this show?
If len(ShowID) > 0 Then
ShowLikes = request.Cookies("Likes")
ShowLikes = "x" & ShowLikes & "x"
If InStr(ShowLikes, "x" & ShowID & "x") Then display = "unlike" Else display = "like"
'user clicked on un/like
Dim likeClick
likeClick = request.Form("likeLink")
If likeClick > "" Then
showLikes = request.Cookies("Likes")
If showLikes > "" Then showLikes = "x" & showLikes & "x"
If InStr(showLikes, "x" & showid & "x") Then
'unlike
showLikes = Replace(showLikes, showid & "x", "")
Else
'like
showLikes = showLikes & showid
End If
If Left(showLikes, 1) = "x" Then showLikes = Mid(showLikes, 2)
If Right(showLikes, 1) = "x" Then showLikes = Left(showLikes, Len(showLikes) - 1)
response.Cookies("Likes") = ShowLikes
With response.Cookies("Likes")
.domain = "epguides.com"
.expires = #12/31/2037#
.path = "/"
'.secure = true
End With
newURL = Replace(Request.ServerVariables("URL"),"default.asp","")
response.Redirect("https://epguides.com/" & newURL)
End If
Else
'do nothing
End If
%>
(a Titles & Air Dates Guide)
Last updated:
<%=getLastMod("../rage/6322.txt") %>
Show Details:
Start date:
Mar 1976
End date: Apr 1978
Status: cancelled/ended
Network(s):
ABC (
US)
Run time: 120 min except 60 min (episodes 2-3)
Episodes: 5 eps
Genre(s): Western
Credits:
Episode list from:
TVRage (links if any to TVRage may no longer work)
Original
Episode # Prod # Air Date Titles
_____ ______ ___________ ___________ ___________________________________________
• Pilot
0 1-00 01/Mar/76 The Young Pioneers (120 min)
0 1-00 17/Dec/76 The Young Pioneers' Christmas (120 min)
• Season 1
1 1-01 188532 02/Apr/78 Sky in the Window
2 1-02 188534 09/Apr/78 A Kite for Charlie
3 1-03 188536 16/Apr/78 The Promise of Spring