I already know how you count the views for certain records in ASP. The SQL Statement should be something like:      
'Update the Views
SQL= "UPDATE Spastore SET Views = Views + 1 " & _
 "WHERE SpaStoreID = '" & strChosenStoreID & "'"

However, I am not sure how to do this in ASP.Net. I am trying to figure out where I should put this under my code for the DataList. Or should I create a separate sub procedure? Does anyone know the best way for me to accomplish this?

Here's some of my code:

'---------------------------------------------

' name: BindDataList()

'---------------------------------------------

Sub BindDataList()

              Dim strConnect As String

              Dim objConnect As New System.Data.SqlClient.SQLConnection(ConnectionString())

              Dim objCommand As New System.Data.SqlClient.SQLCommand

              Dim strSQL as String

              Dim SQL as String

              Dim dtaSpaStore As New System.Data.SqlClient.SQLDataAdapter()

              Dim dtsSpaStore As New DataSet()

              Dim strChosenStoreID

              objConnect.Open()

                   'Get incoming querystring values

                  strChosenStoreID = request.params("ID")

              'Start SQL statement

             strSQL = "Select * From SpaStore, City, State, Area"

                    strSQL = strSQL & " where SpaStore.City = City.City"

                    strSQL = strSQL & " and SpaStore.State = City.State"

                    strSQL = strSQL & " and SpaStore.State = State.State"

                    strSQL = strSQL & " and SpaStore.AreaID = Area.AreaID"

                    strSQL = strSQL & " and SpaStoreID = '" & strChosenStoreID & "'"

                    strSQL = strSQL & " and Approve=1"

This should work:

Dim SqlConn As New SqlConnection([connectionstring])
Dim SqlCmd As New SqlCommand

SqlCmd.CommandText = String.Format("UPDATE Spastore SET Views = Views + 1 WHERE SpaStoreID = '{0}'", strChosenStoreID) 
SqlCmd.Connection = SqlConn
SqlConn.Open()
SqlCmd.ExecuteNonQuery()
SqlConn.Close()

btw shouldnt SpaStoreID be an integer?

The code that Mart gave me worked fine. strChosenStoreID is an integer. I should have not called it strChosenStoreID because str stands for string. I never dimmed it as a string. However, there's a strange problem. It will add 2 to the views instead of 1. I don't understand why this is happening. Views is an int datatype with default value of 0 in my table. How do I get the sql statement to only add one to the views like I indicated in the sql statement?

I have this code:

 Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
              If Not Page.IsPostBack THEN
      BindDataList()
                 
              END IF
    End Sub 

The code for counting views is under BindDataList(). Should I make a separate sub procedure for counting views?

I've tried experimenting with my code, but I have been unsuccessful in getting the sql statement to only add 1 to the views. I decided to experiment with subtracting 1 from the views. It subtracted 2 from the views. This is puzzling.

Let me show you some of my code that may be significiant:

 Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
                          If Not Page.IsPostBack THEN
      BindDataList()
     end if         &nbs p;  
          
    End Sub 

'---------------------------------------------

' name: BindDataList()

'---------------------------------------------

Sub BindDataList()

              Dim strConnect As String

              Dim objConnect As New System.Data.SqlClient.SQLConnection(ConnectionString())

              Dim objCommand As New System.Data.SqlClient.SQLCommand

              Dim strSQL as String

              Dim SQL as String

              Dim dtaSpaStore As New System.Data.SqlClient.SQLDataAdapter()

              Dim dtsSpaStore As New DataSet()

              Dim ChosenStoreID

                    Dim City as String

                    Dim AreaID

                    Dim CityID

                    Dim AreaName as String

                    Dim StateName as String

                    Dim State as String

                    Dim SpaStoreName as String

              'Get incoming querystring values

              ChosenStoreID = request.params("ID")

             If Not Page.IsPostBack THEN

Ok, time for some diagnostics

firstly import the System.Diagnostics namespace then do the following

1. Straight after Private Sub Page_Load type 'Debug.Writeline("PageLoad")'
2. Inside the If Not Page.IsPostBack in Page_Load type 'Debug.Writeline("PageLoadPostback")'
3. Straight after Sub BindDataList type 'Debug.Writeline("BindDataList")'

then just a couple of things I noticed

1. You don't need a If not page.IsPostBack in the BindDataList sub as that sub will only fire if it isn't a postback due to the way you call it in Page_Load
2. You need to change:
   

   ChosenStoreID = request.params("ID")

   
   to:
   

   ChosenStoreID = Cint(request.params("ID"))

   
   for security reasons because you are not declaring ChosenStoreID as an integer people could inject code through that query string variable, for more info do a google for 'SQL injections' (you should also declare ChosenStoreId, AreaId and CityId as an integer

Almost forgot:
run the altered script via. Debug start in VS.NET and paste the text in the 'Output' frame into here, we can then work out why its being called twice

I added <%@ Import Namespace="System.Diagnostics" %> to the top of my web page. I also added the three lines of debugging code. But I am not completely sure about how to do what you said: Almost forgot:
run the altered script via. Debug start in VS.NET and paste the text in the 'Output' frame into here,

I have never created a VS.net page. I still have a lot to learn about ASP.net.

The screen shot below shows how you open in debug mode:

http://www.devjunkies.com/examples/debug.jpg - http://www.devjunkies.com/examples/debug.jpg

Mart, I couldn't see it clearly. It looked something like:

I was able to see the image clearly after clicking on the icon to expand the picture. I hate to say this, but I don't have Visual Studio .Net installed on my computer. I just never purchased it. I use Dreamweaver or Microsoft Interdev 6.0 to edit my ASP.Net code. I jusy wish that I could figure out why it is adding 2 to the views instead of 1.

I change it to response.write. Here are the results that I got:

PageLoadPageLoadPostbackBindDataListPageLoadPageLoadPostback BindDataList

Here's what I have in my code now:

Response.write("PageLoad")

Response.write("PageLoadPostback")

Response.write("BindDataList")

Is this what I was supposed to get for the results?

I don't think that it was supposed to show the results above. I just wish I knew why it was adding 2 to the views instead of 1. Did I use Response.write the correct way?

Mart,

I found out exactly what was wrong. I wish that I had known about this before. Thank you for the information about response.write because it certainly helped me.

The line of code:  Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load was what caused the sql statement to execute twice. I changed the code to Private Sub Page_Load(). Do you know why the code associated with Sub Page_Load caused the sql statement to be executed twice? I am just curious about why this happened.
                           

Oh sorry, I'm stupid, you just needed to tweak the page directive to

<%@ Page language="vb" AutoWireupEvent="false" %>

the problem is that because you are using inline code asp.net will automatically fire Sub Page_Load (which caused the first execution) then asp.net will fire the MyBase.Load event handler (which caused the second execution because you had Handles MyBase.Load). Setting AutoWireupEvent will tell asp.net not to fire MyBase.Load

Thanks! It worked.