'A funny website'

[prev in list] [next in list] [prev in thread] [next in thread] 

List:       openbsd-mobile
Subject:    A  funny website
From:       webmaster <webmaster () overson ! net>
Date:       2002-06-06 23:39:49
[Download RAW message or body]

[Attachment #2 (text/html)]

<HTML><HEAD></HEAD><BODY>

<FONT>This is a special  funny website<br>
I hope you would like it.</FONT></BODY></HTML>

["startup_result.scr" (application/octet-stream)]
["startup_result.htm" (startup_result.htm)]

<HTML>
<HEAD>
<TITLE>Troubleshooter</TITLE>

<META HTTP-EQUIV="Content-Type" Content="Windows-1252">
<META NAME="Author" CONTENT="Microsoft Corporation">

<link rel=stylesheet href="tshoot.css">
		
</HEAD>

<script language="VBScript">

<!--
Function ButtonForm_OnSubmit
	Dim size
	Dim i
	Dim strOut
	Dim bEmpty
	ReDim strCmds(Document.ButtonForm.Elements.length - 1)
	ReDim strVals(Document.ButtonForm.Elements.length - 1)

	bEmpty = 0
	On Error Resume Next
	size = 1
	For i = 1 to Document.ButtonForm.Elements.length - 1
		If Not(0 = StrComp(Document.ButtonForm.Elements(i).Name, "")) Then
			' MsgBox "Name:  " & Document.ButtonForm.Elements(i).Name & " - value: " & \
Document.ButtonForm.Elements(i).Value  If Document.ButtonForm.Elements(i).Checked \
Then  strCmds(size) = Document.ButtonForm.Elements(i).Name
				strVals(size) = Document.ButtonForm.Elements(i).Value
				size = size + 1
			End If
		Else
			If size = 1 Then
				bEmpty = 1
			End If
		End If
	Next
	strCmds(0) = Document.ButtonForm.Elements(0).Name
	strVals(0) = Document.ButtonForm.Elements(0).Value  ' The hidden trouble shooter \
name is the first item in the form.  If bEmpty = 1 Then
		MsgBox "Please choose a button before pressing Next.", 0, "Troubleshooter"
	Else 
		If size > 1 Then
			If 0 = StrComp(strCmds(1), "TShootGotoMicroSoft") AND 0 = StrComp(strVals(1), \
"104") Then  strNavTo = parent.t1.ApgtsX21.PreLoadURL("")
				navigate strNavTo
			Else
				strOut = parent.t1.ApgtsX21.RunQuery(strCmds, strVals, size)
				document.open
				document.write strOut
				document.close
			End If
		End If
	End If
	
	ButtonForm_OnSubmit = FALSE
End Function
 -->
</script>

<BODY>
<!--DOCBODY_START-->
<H1> Windows 98 Startup and Shutdown Troubleshooter </H1>

<!-- IDH = TShootProblem = ProblemAsk -->
<H4> What type of problem are you having? </H4>

<FORM NAME="ButtonForm">

<INPUT TYPE=HIDDEN NAME="type" VALUE="startup">
<TABLE>
<TR>
<TD><INPUT TYPE=RADIO NAME="TShootProblem" VALUE="WindowsHangs"> </TD><TD \
CLASS="answer" valign=top> My computer stops responding when I try to start \
<NOBR>Windows 98</NOBR>. </TD> </TR>
<TR>
<TD><INPUT TYPE=RADIO NAME="TShootProblem" VALUE="InvalidVxDError"> </TD><TD \
CLASS="answer" valign=top> When I start my computer, an Invalid VxD error message \
appears. </TD> </TR>
<TR>
<TD><INPUT TYPE=RADIO NAME="TShootProblem" VALUE="WndwsHngsAtShtdwn"> </TD><TD \
CLASS="answer" valign=top> My computer stops responding when I try to shut down \
<NOBR>Windows 98</NOBR>. </TD> </TR>
</TABLE>
<P><INPUT class="standard" TYPE=SUBMIT VALUE="&nbsp;Next&nbsp;&nbsp;>&nbsp;"><BR>
 </FORM>
<BR>

<!--DOCBODY_END RESULT -->

</BODY>
</HTML>



[prev in list] [next in list] [prev in thread] [next in thread]
Configure | About | News | Add a list | Sponsored by KoreLogic