drocco21
asked on
Simple VB.net passing data from .vb file to .aspx file
I am looking to select data from a database in the .vb file so I can do an if/then statement. I then want that information to display on the .aspx page, in a gridview, or however it would be easiest. I am new to VB.net and just now getting a handle on it.
Below is the code for both the .vb file and the .aspx file. I think I have the connection string setup correctly but im not sure how to do the if/then in the .vb file. additionally I am stumped on how to get this to talk to the .aspx page and display the data.
Thanks for your help
Below is the code for both the .vb file and the .aspx file. I think I have the connection string setup correctly but im not sure how to do the if/then in the .vb file. additionally I am stumped on how to get this to talk to the .aspx page and display the data.
Thanks for your help
---.vb file---
Imports System.Data.SqlClient
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim now = Date.Now
Dim Conn As New SqlConnection("Initial Catalog=court_dms;Data Source=DINO;Integrated Security=no; User ID=norton;PWD=goldcat13")
Dim SQL As String
SQL = "SELECT * FROM court_gbs"
Dim Comm As New SqlCommand(SQL, Conn)
If court_gbs.judge = hoover Then
Response.Write("test value")
End If
Conn.Close()
End Sub
End Class
---.aspx file---
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
</div>
<asp:GridView ID="GridView1" runat="server">
</asp:GridView>
</form>
</body>
</html>
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
Hello, I did what you stated above, but it is now saying the datatable is not defined. Below is the error and the new code:
Compiler Error Message: BC30002: Type 'DataTable' is not defined.
Source Error:
Line 4:
Line 5: Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Line 6: Dim dtJudges As New DataTable("Judges")
Line 7: Using conn As New SqlConnection("Initial Catalog=court_dms;Data Source=DINO;Integrated Security=no; User ID=norton;PWD=goldcat13")
Line 8: Using cmd As New SqlCommand("SELECT * FROM court_gbs", conn)
Compiler Error Message: BC30002: Type 'DataTable' is not defined.
Source Error:
Line 4:
Line 5: Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Line 6: Dim dtJudges As New DataTable("Judges")
Line 7: Using conn As New SqlConnection("Initial Catalog=court_dms;Data Source=DINO;Integrated Security=no; User ID=norton;PWD=goldcat13")
Line 8: Using cmd As New SqlCommand("SELECT * FROM court_gbs", conn)
Imports System.Data.SqlClient
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim dtJudges As New DataTable("Judges")
Using conn As New SqlConnection("Initial Catalog=court_dms;Data Source=DINO;Integrated Security=no; User ID=norton;PWD=goldcat13")
Using cmd As New SqlCommand("SELECT * FROM court_gbs", conn)
Using da As New SqlDataAdapter(cmd)
da.Fill(dtJudges)
End Using
End Using
End Using
GridView1.DataSource = dtJudges
End Sub
End Class
ASKER
OK, I was playing with this and in VS it recommended adding the following:
Imports System.Data
It now is working without error, but is a blank page with no data, not sure what that is all about. If this imports System.Data is wrong feel free to yell lol
Imports System.Data
It now is working without error, but is a blank page with no data, not sure what that is all about. If this imports System.Data is wrong feel free to yell lol
Imports System.Data.SqlClient
Imports System.Data
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim dtJudges As New DataTable("Judges")
Using conn As New SqlConnection("Initial Catalog=court_dms;Data Source=DINO;Integrated Security=no; User ID=norton;PWD=goldcat13")
Using cmd As New SqlCommand("SELECT * FROM court_gbs", conn)
Using da As New SqlDataAdapter(cmd)
da.Fill(dtJudges)
End Using
End Using
End Using
GridView1.DataSource = dtJudges
End Sub
End Class
You'll also need to import System.Data.SqlClient.
I'm assuming that you're using SQL Server as your back end database.
Did you try adding GridView1.DataBind?
I'm assuming that you're using SQL Server as your back end database.
Did you try adding GridView1.DataBind?
ASKER
Sorry, should have paid more attention to what you said the first time, about the databind. I added the databind and all is well, thanks so much for your help. I have one more question and will put a link on the bottom of this, relating to if/then, then I am done. Below is the working code:
Imports System.Data.SqlClient
Imports System.Data
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
Dim dtJudges As New DataTable("Judges")
Using conn As New SqlConnection("Initial Catalog=court_dms;Data Source=DINO;Integrated Security=no; User ID=norton;PWD=goldcat13")
Using cmd As New SqlCommand("SELECT * FROM court_gbs", conn)
Using da As New SqlDataAdapter(cmd)
da.Fill(dtJudges)
End Using
End Using
End Using
GridView1.DataSource = dtJudges
GridView1.DataBind()
End Sub
End Class
ASKER
Thanks
ASKER
Compiler Error Message: BC30451: Name 'court_gbs' is not declared.
Source Error:
Line 9: SQL = "SELECT * FROM court_gbs"
Line 10: Dim Comm As New SqlCommand(SQL, Conn)
Line 11: If court_gbs.judge = hoover Then
Line 12: Response.Write("test value")
Line 13: End If