hallo zusammen.
Hab ein kleines probelm. komme leider nicht mehr weiter mit dem script.
Fehlermeldung:
Laufzeitfehler in Microsoft VBScript error '800a000d'
Typen unverträglich
/mailparser/Default.asp, line 46
der script:
checksql = "SELECT domain,sum(groesse) as total FROM mail_log group by domain order by total desc"
set rsCheck=connTraffic.execute(checksql)
if not rsCheck.eof then%>
<table cellpadding="0" cellspacing="0" border="0" width="780">
<tr>
<td colspan="4"><hr></td>
<td> </td>
</tr>
<% transf = 0
count = 1
do while not rsCheck.eof and count <= 10
[COLOR=red]size = formatnumber(rsCheck("total") / 1024 / 1024,2)[/COLOR]
domainresult = rsCheck("domain")%>
<tr>
<td width="20"> </td>
<td width="30"><%=count%></td>
<td width="200"><%=domainresult%></td>
<td width="100"><strong><%=size%> MB</strong></td>
<td> </td>
</tr>
<tr>
<td colspan="4"><hr></td>
<td> </td>
</tr>
<%rsCheck.movenext
transf = transf + size
count = count +1
loop%>
die zeile wo es verweist wird ist rot markiert.
Danke für die hilfe.....
Hab ein kleines probelm. komme leider nicht mehr weiter mit dem script.
Fehlermeldung:
Laufzeitfehler in Microsoft VBScript error '800a000d'
Typen unverträglich
/mailparser/Default.asp, line 46
der script:
checksql = "SELECT domain,sum(groesse) as total FROM mail_log group by domain order by total desc"
set rsCheck=connTraffic.execute(checksql)
if not rsCheck.eof then%>
<table cellpadding="0" cellspacing="0" border="0" width="780">
<tr>
<td colspan="4"><hr></td>
<td> </td>
</tr>
<% transf = 0
count = 1
do while not rsCheck.eof and count <= 10
[COLOR=red]size = formatnumber(rsCheck("total") / 1024 / 1024,2)[/COLOR]
domainresult = rsCheck("domain")%>
<tr>
<td width="20"> </td>
<td width="30"><%=count%></td>
<td width="200"><%=domainresult%></td>
<td width="100"><strong><%=size%> MB</strong></td>
<td> </td>
</tr>
<tr>
<td colspan="4"><hr></td>
<td> </td>
</tr>
<%rsCheck.movenext
transf = transf + size
count = count +1
loop%>
die zeile wo es verweist wird ist rot markiert.
Danke für die hilfe.....
Kommentar