Solved

error Statement cannot appear within a method body. End of method assumed.

Posted on 2004-09-02
2
1,334 Views
Last Modified: 2008-02-26
i get this error anyone help?

Compiler Error Message: BC30289: Statement cannot appear within a method body. End of method assumed.

Source Error:

Line 102:        #End ExternalSource
Line 103:        
Line 104:        Public Sub New()
Line 105:            MyBase.New
Line 106:            Dim dependencies As System.Collections.ArrayList


Source File: C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\Temporary ASP.NET Files\connectinglondon\61230c6b\282ab1ea\xgmmli6w.0.vb    Line: 104




<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="iso-8859-1" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<html>

<script language="VB" runat="server">

             Sub Submit_Click(Sender as Object, e as EventArgs)
             Dim cnn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; data source=" & server.mappath("cl.mdb"))
                    Dim cmd As New OleDb.OleDbCommand
              Dim dr As Oledb.OleDbDataReader
 
 
 
  cmd.Connection = cnn
       cmd.CommandText = "SELECT email, pass FROM members WHERE email = " & email.Value & "AND pass = " & pass.Value

        cnn.Open()
        dr = cmd.ExecuteReader(commandbehavior.closeconnection)
        While dr.read
        Session("email") = dr.item("email")
        Session("pass") = dr.item("pass")
        End While
If Not IsDBNull(Session("email")) Then
    'You found a match do whatever
   Else
    'you didn't find a match do whatever
End If
     
        cnn.Close()

        cmd.Dispose()
        cnn.Dispose()
 
 
 
 
     </script>


<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<form runat="server">
<table width="auto"  border="0">
  <tr>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td>Email Address: </td>
    <td><input type="text" ID="email" value="" runat="server"></td>
  </tr>
  <tr>
    <td>Password:</td>
    <td><input type="password" ID="pass" value="" runat="server"></td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td><input type="submit" OnServerClick="Submit_Click" value="Submit" runat="server"></td>
  </tr>
</table>



</form>


</body>
</html>
0
Comment
Question by:pigmentarts
2 Comments
 
LVL 9

Accepted Solution

by:
Thalox earned 500 total points
ID: 11961768

I think between

...
 cnn.Dispose()
 
 and
 
   </script>

there should be an end (or endsub, I dont have much expirience in vb)

Thalox
0
 
LVL 12

Author Comment

by:pigmentarts
ID: 11961796
thank you i have more error i need help with also will post when i get to them, thanks again
0

Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone 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

In an ASP.NET application, I faced some technical problems. In this article, I list them out and show the solutions that I found.  I hope it will be useful. Problem: After closing a pop-up window, the parent page should be refreshed automaticall…
User art_snob (http://www.experts-exchange.com/M_6114203.html) encountered strange behavior of Android Web browser on his Mobile Web site. It took a while to find the true cause. It happens so, that the Android Web browser (at least up to OS ver. 2.…
Finds all prime numbers in a range requested and places them in a public primes() array. I've demostrated a template size of 30 (2 * 3 * 5) but larger templates can be built such 210  (2 * 3 * 5 * 7) or 2310  (2 * 3 * 5 * 7 * 11). The larger templa…

856 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