<% Function RetrieveCount(strFile) ' From adovbs.inc: Const adOpenKeyset = 1 Const adLockPessimistic = 2 Const adCmdText = &H0001 ' Local variables Dim strFilename Dim strSQL Dim rsCounter Dim iCount ' Get filename and build SQL query strFilename = strFile strSQL = "SELECT page_name, hit_count FROM hit_count WHERE page_name='" & strFilename & "';" ' Open our recordset Set rsCounter = Server.CreateObject("ADODB.Recordset") ' Access version: rsCounter.Open strSQL, _ "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/hod/jukcounter/jukcounter.mdb") & ";", _ adOpenKeyset, adLockPessimistic, adCmdText ' SQL Server version: 'rsCounter.Open strSQL, "Provider=SQLOLEDB;Data Source=10.2.1.214;" _ ' & "Initial Catalog=samples;User Id=samples;Password=password;" _ ' & "Connect Timeout=15;Network Library=dbmssocn;", _ ' adOpenKeyset, adLockPessimistic, adCmdText ' If we've got a record then we read the current value ' If we don't then we create one, set the filename, and start at 0 If rsCounter.EOF Then rsCounter.AddNew iCount = 0 rsCounter.Fields("page_name").Value = strFilename Else rsCounter.MoveFirst iCount = rsCounter.Fields("hit_count").Value End If RetrieveCount = iCount End function %>

Please donate to JukSoft

How To Start:

1) Double-click "Hangman_Launcher.exe"
2) Select the number of teams you wish to use.
3) Edit the names of the teams you wish to use.
4) Click "Run Hangman" to start playing.

How to:	Mouse	Keyboard
Spin wheel	Hold mouse button over "Hold to Spin"	Hold ENTER
Stop wheel	Release left mouse button	Release ENTER
Select letter	Click on available letter	Press key for available letter
Solve puzzle	Click on "Solve Puzzle"	Press SPACE BAR
	Type in answer with keyboard and hit ENTER
Steal points	Click on team to steal from	Press the team's number (1,2,3)
Skip puzzle		-> button
Exit game		Press ESC

How to edit puzzles:

1) Double-click "Hangman_Launcher.exe"
2) Click on "Edit Puzzles"
3) Follow instructions found on that form

Hanman of Death™ is a registered trademark of JukSoft INC. ©2006