<div>
usually you would wrap a # around the Date, but I cannot find no information on <br />
Wrapping it around a Form(&quot;&quot;) item....?<br />
<br />
Still checking.<br />
Carrzkiss
</div>


usually you would wrap a # around the Date, but I cannot find no information on
Wrapping it around a Form("") item....?

Still checking.
Carrzkiss

<div>
Your welcome, I think you are anyway?<br />
<br />
Have a good one.<br />
Carrzkiss
</div>


Your welcome, I think you are anyway?

Have a good one.
Carrzkiss

<div>
Im sorry carrzkiss,<br />
<br />
Thank you very muchly.<br />
<br />
Beav
</div>


Im sorry carrzkiss,

Thank you very muchly.

Beav

<div>
You are so very welcome.<br />
I knew you would come in and say thank you....<br />
You rock.<br />
Keep up the coding.<br />
<br />
Carrzkiss
</div>


You are so very welcome.
I knew you would come in and say thank you....
You rock.
Keep up the coding.

Carrzkiss

<div>
<div class="content wysiwyg-content">
Hi All,<br />
<br />
Ive found this code on an existing post. But when I change it to meet my needs it wont work. Please see below code.<br />
<br />
This is the error I get;<br />
Microsoft VBScript runtime error '800a000d' <br />
Type mismatch: '[string: &quot;10/03/2009&quot;]' <br />
/hr/RTW_Form.asp, line 5<br />
<br />
On line 5 if I change Request.Form(&quot;LastDateOfAb<wbr />sence&quot;) for Date() it works fine.<br />
<br />
Any idea's?<br />
<br />
Beav<br />

<pre><code id="code-280836">&lt;%
If Request.Form(&quot;FirstDateOfAbsence&quot;) &lt;&gt; &quot;&quot; And Request.Form(&quot;LastDateOfAbsence&quot;) &lt;&gt; &quot;&quot; Then
  Dim strWorkingDays
  strWorkingDays = 0
  For i = Request.Form(&quot;FirstDateOfAbsence&quot;) To Request.Form(&quot;LastDateOfAbsence&quot;)
    If WeekDay(i) &lt;&gt; 7 And WeekDay(i) &lt;&gt; 1 Then
      strWorkingDays = strWorkingDays + 1
    End If
  Next
Response.Write(strWorkingDays)
End If
%&gt;</code></pre>
</div>
</div>


Hi All,

Ive found this code on an existing post. But when I change it to meet my needs it wont work. Please see below code.

This is the error I get;
Microsoft VBScript runtime error '800a000d' 
Type mismatch: '[string: "10/03/2009"]' 
/hr/RTW_Form.asp, line 5

On line 5 if I change Request.Form("LastDateOfAbsence") for Date() it works fine.

Any idea's?

Beav

Calculate Working Days

Active Server Pages (ASP) is Microsoft’s first server-side engine for dynamic web pages. ASP’s support of the Component Object Model (COM) enables it to access and use compiled libraries such as DLLs. It has been superseded by ASP.NET, but will be supported by Internet Information Services (IIS) through at least 2022.