stdctrl.vb

This is a book about vb.you could learn this from this book

Imports System
Imports System.Collections
Imports System.Configuration
Imports System.Web.UI
Imports System.Web.Security


Namespace IBuyAdventure

   Public Class ControlBase
   	Inherits UserControl
   
      Public Function getConnStr() As String
      
	Dim dsn As String = ConfigurationSettings.AppSettings("connectionString")
	
	Return dsn
      
      End Function
      
   End Class

End Namespace