Showing posts with label vbscript. Show all posts
Showing posts with label vbscript. Show all posts

Wednesday, March 7, 2012

Microsoft VBScript Runtime error 800a001c

I was editing my website and added a feature in error. I tried deleting it
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

I was editing my website and added a feature in error. I tried deleting it
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

I was editing my website and added a feature in error. I tried deleting it
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

Hello,

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.