
Windows 2000, VB Script, Visual InterDev and SQL Server 7
Greetings,
PLEASE HELP !!!
The above is my configuration. I am having a wierd problem in Visual
Interdev. I working in an following ASP file that is using a DataEnvironment
command object. The Command object has the following SQL statement:
SELECT
UserGroups.PlantHireID, UserGroups.ContractorID, UserGroups.Admin,
Users.UserID, Users.UserGroupID, Users.UserName, Users.Password
FROM Users INNER JOIN UserGroups ON Users.UserGroupID =
UserGroups.UserGroupID
My problem is that I cannot for the life of me get a result back containing
valid information. I know that there is a valid record and when I execute
the script I get back nothing.
Here is the script for the ASP page:
<SCRIPT id=DebugDirectives runat=server language=javascript>
</SCRIPT>
<% ' VI 6.0 Scripting Object Model Enabled %>
<!--#include file="_ScriptLibrary/pm.asp"-->
<% if StartPageProcessing() Then Response.End() %>
<FORM name=thisForm METHOD=post>
<%
Dim CurrUserName
Dim CurrUserPass
Dim rs
CurrUserName = Request.Form("UserName")
CurrUserPass = Request.Form("UserPass")
thisPage.CreateDE()
DE.dbcmdVerify CurrUserName, CurrUserPass
Set rs = DE.rsdbcmdVerify
If rs.EOF then
Response.Write("FAIL")
else
Response.Write("Pass")
End if
rs.Close
Set rs = nothing
%>
<% ' VI 6.0 Scripting Object Model Enabled %>
<% EndPageProcessing() %>
</FORM>
Thanks,
Robert Lancaster