Wednesday, March 7, 2012
Microsoft VBScript Runtime error 800a001c
all to no avail. Then I began getting the following error message:
Microsoft VBScript runtime error '800a001c'
Out of stack space: 'Val'
/admin/content/pages.asp, line 7
The part in /admin/content/pages.asp, line 7 reads:
For I = 0 To UBound(arrArray)
If Val(arrArray(I)) = Val(varValue) Then
Array_Exists = True
Exit Function
End If
Next
Array_Exists = False
End Function
I have no idea what to do about it. Any hint or link to the right direction
will be appreciated.
Thanks.
Answered elseewhere. Pick a more appropriate NG and don't post the same
message independently to multiple newsgroups.
Microsoft VBScript Runtime error 800a001c
all to no avail. Then I began getting the following error message:
Microsoft VBScript runtime error '800a001c'
Out of stack space: 'Val'
/admin/content/pages.asp, line 7
The part in /admin/content/pages.asp, line 7 reads:
For I = 0 To UBound(arrArray)
If Val(arrArray(I)) = Val(varValue) Then
Array_Exists = True
Exit Function
End If
Next
Array_Exists = False
End Function
I have no idea what to do about it. Any hint or link to the right direction
will be appreciated.
Thanks.Answered elseewhere. Pick a more appropriate NG and don't post the same
message independently to multiple newsgroups.
Friday, February 24, 2012
Microsoft VBScript Runtime error 800a001c
all to no avail. Then I began getting the following error message:
Microsoft VBScript runtime error '800a001c'
Out of stack space: 'Val'
/admin/content/pages.asp, line 7
The part in /admin/content/pages.asp, line 7 reads:
For I = 0 To UBound(arrArray)
If Val(arrArray(I)) = Val(varValue) Then
Array_Exists = True
Exit Function
End If
Next
Array_Exists = False
End Function
I have no idea what to do about it. Any hint or link to the right direction
will be appreciated.
Thanks.Answered elseewhere. Pick a more appropriate NG and don't post the same
message independently to multiple newsgroups.
Microsoft VBScript runtime error
I am currently getting the following error:
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'QueryString'
/admin/equipment/addequipment.asp, line 128
This is when i try to submit a new database item in Dreamweaver. The DB I am using is SQL Server 2005.
My code is as follows:
Dim equipspec__urlid
equipspec__urlid = "1"
If (QueryString("ID") <> "") Then
equipspec__urlid = QueryString("ID")
End If
%>
<%
Dim equipspec
Dim equipspec_numRows
Set equipspec = Server.CreateObject("ADODB.Recordset")
equipspec.ActiveConnection = MM_intranet_STRING
equipspec.Source = "SELECT * FROM EquipSpec WHERE " + Replace(equipspec__urlid, "'", "''") + " = EquipSpec.ID"
equipspec.CursorType = 0
equipspec.CursorLocation = 2
equipspec.LockType = 1
equipspec.Open()
Would be greatful if anybody could help, let me know if you need more info.
Many thanks.This is not a TSQL issue. You have a type mismatch in your VB code. The error message contains the line in your source code so check that to see the problem.