Powered by i.TV
September 2, 2015

TiVo offers $200 rebate on Series3 recorders for Father's Day

by Brad Linder, posted May 23rd 2007 5:35PM
TiVo Series3If you're the type to take pity on your dad for his efforts to record HD World War II specials on The History Channel using his old school VCR, you might be thinking of picking him up a Series3 TiVo for father's day. TiVo wants to help, and is offering up a $200 rebate good from May 27th through June 16th.

The offer's not available at TiVo.com yet, but you can find all the info, as well as the rebate form (pdf) at DVRupgrade.

Since this is a rebate, not a discount, you should be able to apply it to any Series3 TiVo you pick up from a TiVo reseller. For example, if you pick up a $600 unit from Amazon, you would be able to get a Series3 for about $400. That's assuming Amazon doesn't raise its price this week.

[via TiVo Lovers]

Add a Comment

*0 / 3000 Character Maximum


Filter by:

Oprcon, that's not HD. The Tivo3 is.

May 24 2007 at 11:32 AM Report abuse rate up rate down Reply

Poor Man's PVR (Non-internet)

I have been running at least two PVR that do not use the internet.
I use the following for my PVR:

- ATI rage 128 cards.
- Pentinum 4 1800mhz computer.
- 200gig Harddrive
- over the air antenna

Set-up Operating System
You need to install Windows XP service Pack 2.
I added the following administrator ID "tvshows" but not the main owner of the computer.
I set-up all the passwords for the users for the computer.

Set-up tvshows id to log in right after booting (control userpasswords2)
- start -> run -> control userpasswords2
uncheck "Users must enter a user name and password to use this computer"
click apply and clear out administrator ID and put tvshows and the password

Create the directory for which ati’s recorded programs will go


Create the directory for which the recorded programs will move to after recorded


Set-up the security tab for shared files:

Start -> run -> gpedit.msc

click down to following:

local Computer policy
-> computer Configuration
-> Windows Settings
-> Security Settings
-> Local Policies
-> Security Options
Find Policy:

Network access: Sharing and security model for local accounts

and change "Guest only - local users authenticate as Guest"
to "Classic - local users authenticate as themselves"
Turn-off ws32time.dll

Start -> control Panel -> Administrator Tools -> Services -> “Windows Time Properties”

Change [Startup Type:] from “Automatic” to “Disabled”

NOTE: I have found that when this is on and I am recorded ws32time.dll warning will show up and recording will stop.
Reboot the machine
After booting into tvshows ID – change Display Properties so that tvshows does not log out

Left click -> properties ->
[Desktop] tab change the background to (none)
[Screen Saver] tab (none)
Install Rage 128 Device Drivers (from ati.adm.com):

Install Rage 128 Multimedia Center 7.2
Visual Basic Program
-> (Get someone to compile the program so that you can put it in the c:tvpro directory).

‘ Tvdates.exe

Dim sFilepath1 As String
Dim sFilepathA As String

Private Sub Copy_Click()

Dim x As Integer
Dim sOrgFileA As String

Dim sWorkingPath As String

sWorkingPath = sFilepathA

On Error Resume Next

Dim ChangingPath As String
Dim count As Integer
Dim i As Integer
Dim j As Integer
Dim sSource As String

Dim sDestination As String
Dim sSourceFile As String
Dim sDestinationFile As String

Dim iMouseState As Integer
Dim sCurrentDestinationDrive As String

x = 0
j = 0

sCurrentDestinationDrive = sFilepathA
sOrgFileA = sFilepathA

iMouseState = Screen.MousePointer

'Change Mouse state to wait
Screen.MousePointer = 11

Dim NameFileDate As String

Dim sOrgFilePath As String

Dim sOrgDirA As String
sOrgDirA = DirA
'DirA = DirA.List(j) + ""
Dir1 = DirA

DestDiskLabel.Caption = FileA.ListCount
For i = 0 To (FileA.ListCount - 1)

sDestination = sOrgFileA
sSource = sOrgFileA + FileA.List(i)

Dim GetttingDate As String
Dim sTimeDate As String
sTimeDate = FileDateTime(sSource)

Dim sHrsMinSs As String

sHrsMinSs = Format(sTimeDate, "hhAMPM")

Dim FileNameA As String
Dim FileNameNew As String

' to fix files that have Channel in it
If (InStr(FileA.List(i), "Channel")) Then
FileNameA = Left$(FileA.List(i), (Len(FileA.List(i)) - 4))
FileNameNew = Left$(FileNameA, (InStr(FileNameA, "annel") - 1))
FileNameNew = FileNameNew + Right$(FileNameA, (Len(FileNameA) - (InStr(FileNameA, "annel") + 6)))
'FileNameNew = FileNameA + Right$(FileNameA, (Len(FileNameA) - ((InStr(FileNameA, "Channel") + 1))))
'MsgBox (FileNameNew)
ElseIf (InStr(FileA.List(i), "Noname")) Then

' FileNameNew = FileNameNew + Right$(FileNameA, (Len(FileNameA) - (InStr(Fi

May 24 2007 at 4:43 AM Report abuse rate up rate down Reply

Follow Us

From Our Partners