Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 1810
  • Last Modified:

Connection String for Teradata in Classic ASP versus .NET

Hi Experts,
I'm trying to make this script work when I save the file with .aspx extension.
The first part of the script captures the logged in person's login ID, and the second part matches it with his Emp_Id, First and Last name, then displays this info on the page.
It's working perfectly when I use Classic ASP and save the file with .asp extension.
Can anyone please walk me through the process of converting it to .NET and make it work with .aspx extension?
Thank you
<%
If Request.ServerVariables("LOGON_USER") = "" Then
Response.Status = "401 Access Denied"
Response.End
End If
%>
<%
set conn = Server.CreateObject("ADODB.Connection")
conn.Open "DSN=Teradata;DRIVER={Teradata};UID=MyUID;PWD=MyPWD;Persist Security Info=True;"

set rs = Server.CreateObject("ADODB.recordset")

Dim UserID
UserID = Request.ServerVariables("LOGON_USER")
'if always 3 character User ID with '\'
UserID = Mid(UserID, 5)
rs.Open "SELECT First_Name, Last_Name, Emp_Id FROM PhoneBook WHERE Emp_Id = '" & UserID & "'", conn

do until rs.EOF
First_Name = rs("First_Name")
Last_Name = rs("Last_Name")
Emp_Id = rs("Emp_Id")
 rs.MoveNext
loop
rs.close
conn.close
%>

<%=First_Name%> <%=Last_Name%> <%=Emp_Id%>

Open in new window

0
baxtalo
Asked:
baxtalo
  • 5
  • 3
1 Solution
 
baxtaloAuthor Commented:
This is the error message I get on line 8 after I used the Web.Config file:
Compiler Error Message: BC30807: 'Let' and 'Set' assignment statements are no longer supported.
I don't know how to  correct it, and what to use instead of Set in my connection string
0
 
Carl TawnSystems and Integration DeveloperCommented:
A literal translation to VB.Net would be something like:

        If Request.ServerVariables("LOGON_USER") = "" Then
            Response.Status = "401 Access Denied"
            Response.End()
        End If

        Dim UserID As String = Request.ServerVariables("LOGON_USER")
        'if always 3 character User ID with '\'
        UserID = Mid(UserID, 5)

        Dim conn As Odbc.OdbcConnection = New Odbc.OdbcConnection("DSN=Teradata;DRIVER={Teradata};UID=MyUID;PWD=MyPWD;Persist Security Info=True;")
        Dim cmd As Odbc.OdbcCommand = New Odbc.OdbcCommand("SELECT First_Name, Last_Name, Emp_Id FROM PhoneBook WHERE Emp_Id = '" & UserID & "'", conn)
        conn.Open()

        Dim reader As Odbc.OdbcDataReader = cmd.ExecuteReader(CommandBehavior.CloseConnection)

        '// assuming you're only expecting one result
        If reader.Read() Then
            First_Name = reader.GetString(reader.GetOrdinal("First_Name"))
            Last_Name = reader.GetString(reader.GetOrdinal("Last_Name"))
            Emp_Id = reader.GetInt32(reader.GetOrdinal(("Emp_Id"))
        End If

Open in new window


Assuming that the TeraData driver is odbc. To display the values you would normally assign them to control properties rather than just dumping them to the browser too.
0
 
baxtaloAuthor Commented:
I'm absolutely new at VB.Net
How do I make this into a web page? Where do I need to put the brackets?
If I save it the way it is now the browser displays it as plain text.
Thanks
0
What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

 
baxtaloAuthor Commented:
I dont' have Visual Studio, I'm just using Notepad to write my code.
0
 
Carl TawnSystems and Integration DeveloperCommented:
Trying to write and compile an ASP.Net page using notepad is going to be fiddly to say the least. You would be best grabbing yourself a copy of Visual Studio Express, which is free and will make your life a whole lot easier.

Classic ASP is an interpreted language, which is why it is easy to write in Notepad. .Net languages are all compiled, so the process isn't quite as simple.
0
 
baxtaloAuthor Commented:
Thank you very much. I thought that it can be done using Notepad. Until now I coded classic ASP only, and I've never used WYSIWYG editors. I always liked writing the code of my pages myself in TextPad.
I guess I will have to learn using Visual Studio. Can you recommend any books, or web sites that could help me learn using .NET very quickly?
I really appreciate your help.
0
 
Carl TawnSystems and Integration DeveloperCommented:
The best place to start would be Microsofts own:

    http://www.asp.net
0
 
baxtaloAuthor Commented:
Great, thank you!
0

Featured Post

Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

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

  • 5
  • 3
Tackle projects and never again get stuck behind a technical roadblock.
Join Now