Error Help

Dev Shed Forums Sponsor:

December 8th, 2010, 09:04 AM

crazyshady

Contributing User

Join Date: Jan 2007

Location: Dela-Where?

Posts: 42

Time spent in forums: 1 Week 6 h 39 m 54 sec
Reputation Power: 7

Error Help

Hello,

I should start off as saying I am a complete noob to asp. I am normally an PHP developer but I need to do a quick ASP project for my boss. I have this code so far:

Code:

<%

dim errors

call email_validate()

function email_validate()
    Dim required(7), data, errors(), check
    
    required(0) = "name"
    required(1) = "phone"
    required(2) = "address"
    required(3) = "city"
    required(4) = "state"
    required(5) = "zip"
    required(6) = "email"
    
    Set data=Server.CreateObject("Scripting.Dictionary")
    data.Add "name",""
    data.Add "phone",""
    data.Add "address",""
    data.Add "city",""
    data.Add "state",""
    data.Add "zip",""
    data.Add "email",""
    data.Add "comments",""
    
    For Each check In required
       If Not IsEmpty(Request.QueryString(check)) Then data.Item(check) = Request.QueryString(check) End If
    Next
    
end function

%>

Which throws this error:

Request object error 'ASP 0102 : 80004005'

Expecting string input

/test.asp, line 29

The function expects a string as input.

What am I missing? Thanks for your help.

__________________
"Bart Stop Pestering Satan!" - Marge Simpson

December 8th, 2010, 10:20 AM

Doug G

Grumpier Old Moderator

Dev Shed God 19th Plane (14000 - 14499 posts)

Join Date: Jun 2003

Posts: 14,235

Time spent in forums: 1 Month 4 Weeks 14 h 27 m 16 sec
Reputation Power: 4445

What's line 29?

__________________
======
Doug G
======
It is a truism of American politics that no man who can win an election deserves to. --Trevanian, from the novel Shibumi

December 8th, 2010, 10:24 AM

crazyshady

Contributing User

Join Date: Jan 2007

Location: Dela-Where?

Posts: 42

Time spent in forums: 1 Week 6 h 39 m 54 sec
Reputation Power: 7

Quote:

Originally Posted by Doug G

What's line 29?

Line 29 would be:

Code:

If Not IsEmpty(Request.QueryString(check)) Then data.Item(check) = Request.QueryString(check) End If

I have narrowed it down to this part of that line:

Code:

Request.QueryString(check)

December 8th, 2010, 04:50 PM

Doug G

Grumpier Old Moderator

Join Date: Jun 2003

Posts: 14,235

Time spent in forums: 1 Month 4 Weeks 14 h 27 m 16 sec
Reputation Power: 4445

Perhaps request.querystring(check) is null. In vbscript a null is not a string value and you can't convert null to a string. I used to use something like this as a workaround for dealing with nulls

Code:

if len(whatever) > 0 then
 ' something is in whatever
else
 ' whatever is null or an empty string
end if

Developer Shed Advertisers and Affiliates