Skip to content
  • Categories
  • Recent
  • Tags
  • Popular
  • World
  • Users
  • Groups
Skins
  • Light
  • Cerulean
  • Cosmo
  • Flatly
  • Journal
  • Litera
  • Lumen
  • Lux
  • Materia
  • Minty
  • Morph
  • Pulse
  • Sandstone
  • Simplex
  • Sketchy
  • Spacelab
  • United
  • Yeti
  • Zephyr
  • Dark
  • Cyborg
  • Darkly
  • Quartz
  • Slate
  • Solar
  • Superhero
  • Vapor

  • Default (No Skin)
  • No Skin
Collapse
Code Project
CODE PROJECT For Those Who Code
  • Home
  • Articles
  • FAQ
Community
  1. Home
  2. Web Development
  3. ASP.NET
  4. Can anyone ?

Can anyone ?

Scheduled Pinned Locked Moved ASP.NET
sysadminsecuritydebugginghelpquestion
3 Posts 3 Posters 0 Views 1 Watching
  • Oldest to Newest
  • Newest to Oldest
  • Most Votes
Reply
  • Reply as topic
Log in to reply
This topic has been deleted. Only users with topic management privileges can see it.
  • L Offline
    L Offline
    learningman
    wrote on last edited by
    #1

    w. steels soup to nuts series tried to build online auction but he never finished the add auction page i tried to add a detailsview to insert i set the mode to insert and tried to write this code Imports Microsoft.VisualBasic Imports System.Security.Permissions <ComponentModel.DataObject(True)> _ Public Class Auctions Public Shared Sub InsertAuctions(ByVal auction As Auction) End Sub Public Function GetAuctions() As Data.DataTable Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Return AuctionsTable.GetAuctions() End Function Public Function GetAuction(ByVal AuctionID As Integer) As Data.DataTable Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Return AuctionsTable.GetAuctionByID(AuctionID) End Function Public Function SearchAuctions(ByVal SearchString As String) As Data.DataTable Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Try Return AuctionsTable.SearchAuctions("%" + SearchString + "%") Catch Return New Auction("No Matching Records!") End Try End Function Public Function GetAuctionsByDate(ByVal StartDate As DateTime, ByVal EndDate As DateTime) As Data.DataTable 'If My.User.IsInRole("Admin") Then If StartDate < EndDate Then Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Dim dt As Data.DataTable dt = AuctionsTable.GetAuctionsByDate(StartDate, EndDate) If dt.Rows.Count Then Return dt Else Return New Auction("No Matching Records!") End If Else Return New Auction("Dates must be in order!") End If 'Else 'Return New Auction("User Must Be Logged In!") 'End If End Function End Class Public Class Auction Inherits Data.DataTable Sub New() Dim AuctionDataTable As New AuctionSite.AuctionsDataTable For Each col As System.Data.DataColumn In AuctionDataTable.Columns Me.Columns.Add(New System.Data.DataColumn(col.ColumnName)) Next End Sub Sub New(ByVal ErrorString As String) Me.New() Me.Rows.Add.Item(3) = ErrorString End Sub End Class But when i debug i get this! Server Error in '/Auction3' Applicat

    A B 2 Replies Last reply
    0
    • L learningman

      w. steels soup to nuts series tried to build online auction but he never finished the add auction page i tried to add a detailsview to insert i set the mode to insert and tried to write this code Imports Microsoft.VisualBasic Imports System.Security.Permissions <ComponentModel.DataObject(True)> _ Public Class Auctions Public Shared Sub InsertAuctions(ByVal auction As Auction) End Sub Public Function GetAuctions() As Data.DataTable Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Return AuctionsTable.GetAuctions() End Function Public Function GetAuction(ByVal AuctionID As Integer) As Data.DataTable Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Return AuctionsTable.GetAuctionByID(AuctionID) End Function Public Function SearchAuctions(ByVal SearchString As String) As Data.DataTable Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Try Return AuctionsTable.SearchAuctions("%" + SearchString + "%") Catch Return New Auction("No Matching Records!") End Try End Function Public Function GetAuctionsByDate(ByVal StartDate As DateTime, ByVal EndDate As DateTime) As Data.DataTable 'If My.User.IsInRole("Admin") Then If StartDate < EndDate Then Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Dim dt As Data.DataTable dt = AuctionsTable.GetAuctionsByDate(StartDate, EndDate) If dt.Rows.Count Then Return dt Else Return New Auction("No Matching Records!") End If Else Return New Auction("Dates must be in order!") End If 'Else 'Return New Auction("User Must Be Logged In!") 'End If End Function End Class Public Class Auction Inherits Data.DataTable Sub New() Dim AuctionDataTable As New AuctionSite.AuctionsDataTable For Each col As System.Data.DataColumn In AuctionDataTable.Columns Me.Columns.Add(New System.Data.DataColumn(col.ColumnName)) Next End Sub Sub New(ByVal ErrorString As String) Me.New() Me.Rows.Add.Item(3) = ErrorString End Sub End Class But when i debug i get this! Server Error in '/Auction3' Applicat

      A Offline
      A Offline
      Abhijit Jana
      wrote on last edited by
      #2

      Could you please post this with correct format ? Its very difficult to read out for me .

      cheers, Abhijit My Recent Article : Beginner's Guide To ASP.Net Cookies

      1 Reply Last reply
      0
      • L learningman

        w. steels soup to nuts series tried to build online auction but he never finished the add auction page i tried to add a detailsview to insert i set the mode to insert and tried to write this code Imports Microsoft.VisualBasic Imports System.Security.Permissions <ComponentModel.DataObject(True)> _ Public Class Auctions Public Shared Sub InsertAuctions(ByVal auction As Auction) End Sub Public Function GetAuctions() As Data.DataTable Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Return AuctionsTable.GetAuctions() End Function Public Function GetAuction(ByVal AuctionID As Integer) As Data.DataTable Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Return AuctionsTable.GetAuctionByID(AuctionID) End Function Public Function SearchAuctions(ByVal SearchString As String) As Data.DataTable Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Try Return AuctionsTable.SearchAuctions("%" + SearchString + "%") Catch Return New Auction("No Matching Records!") End Try End Function Public Function GetAuctionsByDate(ByVal StartDate As DateTime, ByVal EndDate As DateTime) As Data.DataTable 'If My.User.IsInRole("Admin") Then If StartDate < EndDate Then Dim AuctionsTable As New AuctionSiteTableAdapters.AuctionsTableAdapter() Dim dt As Data.DataTable dt = AuctionsTable.GetAuctionsByDate(StartDate, EndDate) If dt.Rows.Count Then Return dt Else Return New Auction("No Matching Records!") End If Else Return New Auction("Dates must be in order!") End If 'Else 'Return New Auction("User Must Be Logged In!") 'End If End Function End Class Public Class Auction Inherits Data.DataTable Sub New() Dim AuctionDataTable As New AuctionSite.AuctionsDataTable For Each col As System.Data.DataColumn In AuctionDataTable.Columns Me.Columns.Add(New System.Data.DataColumn(col.ColumnName)) Next End Sub Sub New(ByVal ErrorString As String) Me.New() Me.Rows.Add.Item(3) = ErrorString End Sub End Class But when i debug i get this! Server Error in '/Auction3' Applicat

        B Offline
        B Offline
        Brij
        wrote on last edited by
        #3

        Not understandable. and use subject tagline which specify your problem in short.

        Cheers!! Brij

        1 Reply Last reply
        0
        Reply
        • Reply as topic
        Log in to reply
        • Oldest to Newest
        • Newest to Oldest
        • Most Votes


        • Login

        • Don't have an account? Register

        • Login or register to search.
        • First post
          Last post
        0
        • Categories
        • Recent
        • Tags
        • Popular
        • World
        • Users
        • Groups