?
Solved

ASP & error 0115...arhhggg

Posted on 1998-08-28
8
Medium Priority
?
184 Views
Last Modified: 2010-04-09
Fellow prop heads,

Ok, I give.  My quest is simple, but.  When I attempt to sql an asp I receive that annoying 0115.  I've spent my share of time at M$kb..  They mention this to be a problem, and they give 4 possible solutions.  Each has either been done, or was already in affect.  Just to make this problem as generic as possible, I've started using the Northwinds db as my dsn, and the Employees table.  I must add, that the first two days playing with it, I never once had a problem.  So I did what most would do and roll back to an earlier version.  Well, I'm back to bare ado and a single response.write... and I continue to get slammed.  If anyone could throw me a bone, I sure would be greatful...

Keith
0
Comment
Question by:westbergk
  • 4
  • 2
  • 2
8 Comments
 
LVL 1

Author Comment

by:westbergk
ID: 1837146
Edited text of question
0
 
LVL 10

Expert Comment

by:MasseyM
ID: 1837147
What are you trying to do?  Post code please.
0
 
LVL 10

Expert Comment

by:MasseyM
ID: 1837148
Could you please post code?  No response from two days ago, so I decided to post as an answer so you would get an email..

0
VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

 
LVL 1

Author Comment

by:westbergk
ID: 1837149
masseym,

Sorry for taking so darn long.  My plate runnath over....

I have discovered that stopping then starting the web service will clear whatever is causing this error.  I'm not sure if this is even the most recent copy of the test asp, but most, if not all still applies.
***************************************************************************

<%@ LANGUAGE="VBSCRIPT" %>
<html>

<head>
<meta NAME="GENERATOR" Content="Microsoft FrontPage 3.0">
<meta HTTP-EQUIV="Content-Type" content="text/html; charset=iso-8859-1">
<title>Document Title</title>
</head>

<body bgcolor="#FFFFFF">
<% Dim Conn2, RS2, Nm, sql2, Od
    ON ERROR RESUME NEXT
If IsEmpty(request("Name"))Then
   response.write("Enter name")
Else
      Nm = request("Name")
      Od = request("List")
      Sd = request("StationList")

    SET Conn2 = Server.CreateObject("ADODB.Connection")
    Conn2.Mode = 3
    Conn2.Open "FDRecall"
    SET RS2=Server.CreateObject("ADODB.Recordset")

      If Nm <> "" and Nm = "*" then
            response.write("Name not blank and wildcard")
            response.write(Od & "&nbsp;" & Nm)
            sql2 = "SELECT * FROM Personnel ORDER BY " & Od
      Else if Nm <> "" then
            response.write("somrthing entered in name box")
            response.write(Od & "&nbsp;" & Nm)
            sql2 = "SELECT * FROM Personnel WHERE LastName LIKE '" & Nm & "%'" & " ORDER BY " & Od
      Else if Sd <> "&nbsp;" then
            response.write("station box not blank")
            response.write(Sd)
            sql2 = "SELECT * FROM Personnel WHERE Station = '" & Sd & "'"
      Else
            response.write("last choice in station box")
            response.write(Sd)
      End if

    RS2.Open sql2, "DATABASE=Recall;UID=;PW=;DSN=FDRecall", 1, 4

    RS2.MoveFirst%>
<div align="center"><center>

<table border="0" cellpadding="0" cellspacing="0" width="10" style="font-family: Comic Sans MS; font-size: 9pt">
  <tr>
      <%Do Until RS2.EOF
      Response.Write("<td nowrap>&nbsp;" & RS2("Rank") & "&nbsp;</td>" &_
                     "<td nowrap>&nbsp;" & RS2("FirstName") & "&nbsp;</td>" &_
                   "<td nowrap>&nbsp;" & RS2("LastName") & "&nbsp;</td>" &_
                       "<td nowrap>&nbsp;" & RS2("Station") & "&nbsp;</td>" &_
                   "<td nowrap>&nbsp;" & RS2("Shift") & "&nbsp;</td>" &_
                     "<td nowrap>&nbsp;" & RS2("Address") & "&nbsp;</td>" &_
                       "<td nowrap>&nbsp;" & RS2("City") & "&nbsp;</td>" &_
                       "<td nowrap>&nbsp;" & RS2("HomePhone") & "&nbsp;</td>")
      RS2.MoveNext %>
</tr>
      <% Loop %>
</table>
</center></div>
<%  'End If
     RS2.Close
     SET RS2 = Nothing
     Conn2.Close
     SET Conn2 = Nothing
End If
%>
<!webbot bot="GeneratedScript" preview=" " startspan ->

<form method="POST" action="t5.asp" name="FrontPage_Form1">
  <p><input type="text" name="Name" size="20" value="<%=request("Name")%>">
     <input type="submit" value="Submit" name="B1">
  </p>
  <p><select name="List" size="1">
       <option value=" ">&nbsp;</option>
     <option value="LastName">Last Name</option>
     <option value="FirstName">First Name</option>
     <option value="Rank">Rank</option>
     <option value="Station">Station</option>
     <option value="Shift">Shift</option>
     </select>
  </p>

  <P><select name="StationList" size="1">
       <option value=" ">&nbsp;</option>
     <option value="CEF1">Station 1</option>
     <option value="CEF2">Station 2</option>
     <option value="CEF3">Station 3</option>
     <option value="CEF4">Station 4</option>
     <option value="CEF5">Station 5</option>
       <option value="CEF6">Station 6</option>
     <option value="CEF7">Station 7</option>
     <option value="CEFA">Admin/Disp</option>
     <option value="CEFT">Technical Services</option>
     <option value="CEFE">Training</option>
       <option value="CEFL">Logistics</option>
     </select>
  </P>
</form>

</body>
</html>

**************************************************************
I know it looks sloppy, but I've really been hackin at it, trying to
see what is actually causing the problems...
0
 
LVL 1

Author Comment

by:westbergk
ID: 1837150
Sorry for the delay....

I have rejected the last comment, so that the question would be placed back in circulation.
0
 
LVL 1

Accepted Solution

by:
neinei earned 300 total points
ID: 1837151
Try this,

1. delete command Conn2.mode = 3
2. change the attribut of method Open of RS2 object to
   RS2.Open sql2,Conn2, 2, 3
 
0
 
LVL 1

Author Comment

by:westbergk
ID: 1837152
That works.... thanks for the insight
0
 
LVL 1

Expert Comment

by:neinei
ID: 1837153
Thanks westbergk, the points are my first points. I am very happy to receive the points you'd given. Thanks.......
0

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Use these top 10 tips to master the art of email signature design. Create an email signature design that will easily wow recipients, promote your brand and highlight your professionalism.
Today, the web development industry is booming, and many people consider it to be their vocation. The question you may be asking yourself is – how do I become a web developer?
In this tutorial viewers will learn how to style elements, such a divs, with a "drop shadow" effect using the CSS box-shadow property Start with a normal styled element, such as a div.: In the element's style, type the box shadow property: "box-shad…
The viewer will learn the benefit of using external CSS files and the relationship between class and ID selectors. Create your external css file by saving it as style.css then set up your style tags: (CODE) Reference the nav tag and set your prop…
Suggested Courses

609 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question