Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Westi on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Simple question (Absolute beginner)

Status
Not open for further replies.
dbrooks74

dbrooks74

Programmer
Nov 13, 2001
105
US
I'm trying to figure out how to write ASP code. I know I should enclose everything in the <% %> symbols but what about head tags? I have the following code, can someone tell me what should be in the <% and what shouldn't.


<HEAD>
<TITLE>To Do Listing</TITLE>
</HEAD>
<BODY>
<%
Option Explicit

Response.Expires = 0

Dim con, objRS, strconnect

Set con = Server.CreateObject (&quot;ADODB.Connection&quot;)
con.Open &quot;DSN=ToDoList;UID=;PWD=;&quot;
strconnect = &quot;Select * From TASK&quot;
Set objRS = con.Execute(strconnect)

Response.Write (&quot;<b>List of people stored in the Personnel table are listed below:</b>&quot;)
Response.Write (&quot;<p>&quot;)

Response.Write &quot;<TABLE>&quot;

While Not objRS.EOF
Response.Write &quot;<TR>&quot;
Response.Write &quot;<b>&quot; & &quot;<TD>&quot; & objRS(&quot;TASK_USER&quot;) & _
&quot; &quot; & &quot;</TD>&quot; & &quot;<TD>&quot; & objRS(&quot;TASK_NAME&quot;) & &quot;</TD>&quot; & &quot;</b>&quot;
Response.Write (&quot;<BR>&quot;)
objRS.MoveNext
Response.Write &quot;</TR>&quot;
Wend

Response.Write &quot;</TABLE>&quot;

objRS.close
con.Close
Set objRS = Nothing
Set con = Nothing
%>
</BODY>
 
Sort by date Sort by votes
I continue to get this error message. -db


Microsoft VBScript compilation error '800a0400'

Expected statement

/test.asp, line 6

Option Explicit


If I take out everything above the <% symbol it works fine. -db

 
Upvote 0 Downvote
the Option Explicit will typically go above any html in the page.
<%
Option Explicit
Response.Expires = 0
Dim con, objRS, strconnect
Set con = Server.CreateObject (&quot;ADODB.Connection&quot;)
con.Open &quot;DSN=ToDoList;UID=;PWD=;&quot;
strconnect = &quot;Select * From TASK&quot;
Set objRS = con.Execute(strconnect)
%>
<HTML>
<HEAD>
<TITLE>To Do Listing</TITLE>
</HEAD>
<BODY>
<%
Response.Write (&quot;<b>List of people stored in the Personnel table are listed below:</b>&quot;)
Response.Write (&quot;<p>&quot;)
Response.Write &quot;<TABLE>&quot;
While Not objRS.EOF
Response.Write &quot;<TR>&quot;
Response.Write &quot;<b>&quot; & &quot;<TD>&quot; & objRS(&quot;TASK_USER&quot;) & _
&quot; &quot; & &quot;</TD>&quot; & &quot;<TD>&quot; & objRS(&quot;TASK_NAME&quot;) & &quot;</TD>&quot; & &quot;</b>&quot;
Response.Write (&quot;<BR>&quot;)
objRS.MoveNext
Response.Write &quot;</TR>&quot;
Wend
Response.Write &quot;</TABLE>&quot;
objRS.close
con.Close
Set objRS = Nothing
Set con = Nothing
%>
</BODY>
</HTML>

Was it something I said?
admin@onpntwebdesigns.com
 
Upvote 0 Downvote
Option explicit must be the first statement on your page execpt for your language specification.

Place this at the top of your code instead of after the HTML:
<%@ Language=VBScript %>
<% option explicit %>

Thanks,

Gabe
 
Upvote 0 Downvote
Dim con, objRS, strconnect
Set con = Server.CreateObject (&quot;ADODB.Connection&quot;)


Do you need to Dim 'con'? www.vzio.com
ASP WEB DEVELOPMENT



 
Upvote 0 Downvote
yes
-tarwn ------------ My Little Dictionary ---------
Reverse Engineering - The expensive solution to not paying for proper documentation
 
Upvote 0 Downvote
Status
Not open for further replies.

Similar threads

penguinspeaks
  • Locked
  • Question
fso Question 1
Replies
3
Views
203
Offera
Offera
leifoet
  • Locked
  • Question
Insert (new) records in a table => question about the inputscreen
2
Replies
20
Views
454
ChrisHirst
ChrisHirst
Blueie
  • Locked
  • Question
Correct syntax question 2
Replies
4
Views
156
Blueie
Blueie
reedy1969
  • Locked
  • Question
Simple vbscript to change a couple of registry key values
Replies
1
Views
157
ChrisHirst
ChrisHirst
ahoodin7
  • Locked
  • Question
I have a question about loading Act 1
Replies
5
Views
199
MarkSweetland
MarkSweetland

Part and Inventory Search

Sponsor

Back
Top