VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

1.LABEL,BUTTON AND TEXTBOX CONTROL DEMO (HELLO WORLD). 

<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Default.aspx.vb" Inherits="demoone._Default" %>

Message :

OUTPUT:-

[Type text]

Page 1

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

2.DEMO OF CURRENCY CONVERTER. 

Page: CurrencyConverterDemo.aspx

<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="CurrencyConverterDemo.aspx.vb" Inherits="SimpleInterestDemo.CurrencyConverterDemo" %>

....CURRENCY CONVERTER DEMO....

 

  



Page: CurrencyConverterDemo.aspx.vb

Public Partial Class CurrencyConverterDemo Inherits System.Web.UI.Page [Type text]

Page 2

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Label2.Text = "Rupees To Dollar Is :" & Val(TextBox1.Text) * 60 End Sub Protected Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click Label2.Text = "Rupees To Pound Is :" & Val(TextBox1.Text) * 100 End Sub End Class 

OUTPUT:-

3.Calculatore Demo. 

Page: CalculatorDemo.aspx

<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="CalculatorDemo.aspx.vb" Inherits="SimpleInterestDemo.CalculatorDemo" %>

....CALCULATOR DEMO....

[Type text]

Page 3

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT



       



Page: CalculatorDemo.aspx.vb

Public Partial Class CalculatorDemo Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Label3.Text = "Addtion Is :" & CInt(TextBox1.Text) + CInt(TextBox2.Text) End Sub Protected Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click Label3.Text = "Substraction Is :" & CInt(TextBox1.Text) CInt(TextBox2.Text) End Sub Protected Sub Button3_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button3.Click Label3.Text = "Multiplication Is :" & CInt(TextBox1.Text) * CInt(TextBox2.Text) End Sub Protected Sub Button4_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button4.Click Label3.Text = "Division Is :" & CInt(TextBox1.Text) / CInt(TextBox2.Text) End Sub End Class [Type text]

Page 4

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT



OUTPUT:-

4.Simple Interest. 

Page : 3_SimpleInterest.aspx

<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="3_SimpleInterest.aspx.vb" Inherits="SimpleInterestDemo._Default" %>

.....DEMO OF SIMPLE INTEREST.....

[Type text]

Page 5

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT



  
     



Page: 3_simpleInterest.aspx.vb

Partial Public Class _Default Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click SimpleInterest.Text = "Simple Interest : " SimpleInterest.Text &= CType(TextBox1.Text, Integer) * CType(TextBox2.Text, Integer) * CType(TextBox3.Text, Integer) / 100 End Sub Protected Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click TextBox1.Text = "" TextBox2.Text = "" TextBox3.Text = "" SimpleInterest.Text = "" End Sub End Class 

OUTPUT:-

[Type text]

Page 6

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

5. Table like 1 x 1 = 1 Demo. <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="WebForm1.aspx.vb" Inherits="demoone.WebForm1" %>

ENTER ANY NUMBER :



AFTER THAT:Public Partial Class WebForm1 Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click For i = 1 To 10 Response.Write(txtnum.Text & "*" & i & "=" &

[Type text]

Page 7

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

txtnum.Text * i & "
") Next End Sub End Class 

OUTPUT:-

6. Table Control Demo And Literal Demo. PAGE: TableLiteral.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Table.aspx.vb" Inherits="TableControlDemo._Default" %>

ROWS:

COLS:
[Type text]

Page 8

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT


PUT BORDER AROUND CELL.

PAGE 2: TableLiteral.aspx.vb Partial Public Class _Default Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Table1.BorderStyle = BorderStyle.Inset Table1.BorderWidth = Unit.Pixel(1) End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Table1.Controls.Clear() Dim row, col As Integer For row = 0 To Val(TextBox1.Text) Dim rnew As New TableRow() Table1.Controls.Add(rnew) For col = 0 To Val(TextBox2.Text - 1) Dim cellnew As New TableCell() cellnew.Text = "example cell(" & row.ToString() & "," cellnew.Text &= col.ToString() & ")" Dim imgnew As New System.Web.UI.WebControls.Image() imgnew.ImageUrl = "group2.jpg" imgnew.Height = 100 imgnew.Width = 100 If CheckBox1.Checked = True Then cellnew.BorderStyle = BorderStyle.Inset cellnew.BorderWidth = Unit.Pixel(1) End If rnew.Controls.Add(cellnew) cellnew.Controls.Add(imgnew) [Type text]

Page 9

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Next Next End Sub End Class OUTPUT:-

7. Image, ImageButton and ImageMap Demo. Page:- ImageDemo.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="WebForm2.aspx.vb" Inherits="ImageDemo.WebForm2" %> [Type text]

Page 10

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Image Is :
Click On ImageButton :
ImageMap Control :



OUTPUT:-



AFTER CLICK ON IMAGEBUTTON AND IMAGEMAP THE FOLLOWING PAGE(Default.aspx) WILL BE OPEN ...

[Type text]

Page 11

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

8. AdRotator Demo. Page:-AdrotatorDemo.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Adrotator.aspx.vb" Inherits="AdrotatorDemo._Default" MasterPageFile="~/Site1.Master" %> THIS IS MY ADROTATOR DEMO....!
  

XMLFile1.xml

images\p1.jpg Page1.aspx Images1 1 Images1 images\p2.jpg page2.aspx Images2 [Type text]

Page 12

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

2 Images2 images\p3.jpg page3.aspx Images3 3 Images3 images\p4.jpg page4.aspx Images4 4 Images4 

OUTPUT:-

[Type text]

Page 13

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

9. FileUpload Demo. Page: FileUploadDemo.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="FileUploadDemo.aspx.vb" Inherits="SimpleInterestDemo.FileUploadDemo" %>

....FILE UPLOAD DEMO....

[Type text]

Page 14

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Page: FileUploadDemo.aspx.vb Public Partial Class FileUploadDemo Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Dim strfile As String If FileUpload1.HasFile Then Dim strextensionName1 As String = System.IO.Path.GetExtension(FileUpload1.FileName).ToLower() If String.Compare(strextensionName1, ".jpg") = 0 Then strfile = "~\\images\\" & FileUpload1.FileName Label1.Text = strfile End If FileUpload1.SaveAs(Server.MapPath(FileUpload1.FileName) End If Label2.Text = FileUpload1.FileName & " " & "is upload successfully..." End Sub End Class 

OUTPUT:-

 10. Common Demo of Bullet List, ListBox, CheckBox List, DropDown List, RadioButton List. Page:- MixControlsDemo.aspx <%@ Page Language="vb" AutoEventWireup="false" [Type text]

Page 15

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

CodeBehind="MixControlsDemo.aspx.vb" Inherits="SimpleInterestDemo.MixControlsDemo" %> <style type="text/css"> .style1 { width: 100%; } .style2 { font-size: large; }

[Type text]

Page 16

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

<span class="style2">LIST DEMO
Bullet List	ListBox DropDownList CheckBoxList RadioButtonList
Select Country	Select Fruits
Select Hobby	Select Course



Page2:-MixControlsDemo.aspx.vb

Public Partial Class MixControlsDemo Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Not IsPostBack Then countrylist() [Type text]

Page 17

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Fruitlist() Hobbylist() Courselist() End If End Sub Public Sub countrylist() ListBox1.Items.Add("India") ListBox1.Items.Add("USA") ListBox1.Items.Add("UK") ListBox1.Items.Add("Canada") End Sub Public Sub Fruitlist() DropDownList1.Items.Add("Apple") DropDownList1.Items.Add("Mango") DropDownList1.Items.Add("Sapota") DropDownList1.Items.Add("Banana") End Sub Public Sub Hobbylist() CheckBoxList1.Items.Add("Dancing") CheckBoxList1.Items.Add("Reading") CheckBoxList1.Items.Add("Travelling") CheckBoxList1.Items.Add("Writting") End Sub Public Sub Courselist() RadioButtonList1.Items.Add("BCA") RadioButtonList1.Items.Add("MCA") RadioButtonList1.Items.Add("MSCIT") RadioButtonList1.Items.Add("BBA") End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Dim cl As String = ListBox1.Text Dim hl As String Dim fl As String = DropDownList1.Text Label1.Text = "Selected Country Is: " & cl & "
Selected Fruit IS :" & fl For Each lstitem As ListItem In CheckBoxList1.Items If lstitem.Selected = True Then hl = hl + lstitem.Text hl = hl + " " [Type text]

Page 18

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

End If Next Label1.Text = "
Selected Hobbies Are :" & hl & "
Selected Course Is: " & RadioButtonList1.Text & "
Selected Fruit Is: " & DropDownList1.Text End Sub End Class 

OUTPUT:-

11. Login Control. Page:-LoginDemo.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Default.aspx.vb" Inherits="LoginControldemo._Default" %>

LOGIN INFORMATION

USER NAME: [Type text]

Page 19

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT



PASSWORD:

  



Page2:-LoginDemo.aspx.vb

Partial Public Class _Default Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click If TextBox1.Text = "Bhumi" And TextBox2.Text = "Parekh" Then MsgBox("LOGIN SUCCESSFULLY...!") Else MsgBox("INVALID USERNAME OR PASSWORD...!") End If End Sub Protected Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click TextBox1.Text = "" TextBox2.Text = "" End Sub End Class

12. Navigation Control (Menu,TreeView,SiteMapPath control) using in your websit with appropriate place. Page:-Home.aspx <%@ Page Language="vb" AutoEventWireup="false" [Type text]

Page 20

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

CodeBehind="Home.aspx.vb" Inherits="NavigationControlDemo._Default" %> <style type="text/css"> .style1 { width: 100%; } .style3 { font-family: "Times New Roman", Times, serif; font-weight: bold; } .style4 { color: #0099FF; } .style5 { font-family: "Times New Roman", Times, serif; font-weight: bold; color: #0099FF; }

<span class="style5" dir="ltr"> VIDYABHARTI TRUST COLLEGE OF BBA AND BCA, UMRAKH.<span class="style4">   [Type text] Page 21 VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT
<StaticSelectedStyle BackColor="#FFCC66" /> <StaticMenuItemStyle HorizontalPadding="5px" VerticalPadding="2px" /> <StaticHoverStyle BackColor="#990000" ForeColor="White" />
THERE ARE FOLLOWING DEPARTMENTS ARE AVAILABLE IN OUR VTCBB.....! Page 22 VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT Value="DEPARTMENTS" rel="nofollow">
ALL RIGHTS RESERVED BT VTCBB @ 2018, UMRAKH.



OUTPUT:-

[Type text]

Page 23

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

13. LinkButton and HyperLink Demo. Page:-Default.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Default.aspx.vb" Inherits="LinkBtnANDHyperlinkDemo._Default" %> <style type="text/css"> .style1 { width: 40%; height: 206px; } .style2 { width: 261px; } .style3 { width: 495px; } .style4 [Type text]

Page 24

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

{ color: #3366FF; font-weight: bold; }

.....LOGIN PAGE....
NAME:-
PASSWORD:-
[Type text] Page 25 VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT DO YOU WANT TO ADD ACCOUNT...?



Default.aspx.vb

Partial Public Class _Default Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click If TextBox1.Text = "bhumi" And TextBox2.Text = "123" Then Response.Redirect("home.aspx") Else MsgBox("USERNAME OR PASSWORD IS INCORRECT...!") End If End Sub End Class 

OUTPUT:-

When We Click On Link Button (“FORGET PASSWORD”) The Follwing Page Will Open:-

[Type text]

Page 26

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

When We Click On HyperLink The Page (“Do You Want To Add Account ? ”) Will Open:-

14. Calender Control Demo. Page:-CalendarDemo.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Calendardemo.aspx.vb" Inherits="ViewStateDemo._Default" %>

....CALENDAR DEMO....

Page 27

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

/>

Page:-CalendarDemo.aspx.vb Partial Public Class _Default Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Label1.Text = "SELECTED DATE IS :" & Calendar1.SelectedDate End Sub End Class



OUTPUT:-

 15. RequiredFieldValidator, RangeValidator, RegularExpressValidator, CompareValidator, CustomeValidator and Validation summary.

[Type text]

Page 28

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Page1:-ValidationDemo.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="ValidationDemo.aspx.vb" Inherits="ValidationDemo._Default" %> <style type="text/css"> .style1 { width: 100%; }

[Type text]

Page 29

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

[Type text]

Page 30

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

....REGISTRATION FORM....
Name
Address
Gender	Male Female
Email
Password
Confirm Password
Age
Mobile No
&nb sp;                           &nb [Type text] Page 31 VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT sp;                     &nb sp;                          &nb sp;                     &nb sp;                     &nb sp;
Validation:

Page2:-ValidationDemo.aspx.vb Partial Public Class _Default Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click If Page.IsValid Then Response.Redirect("welcome.aspx") End If End Sub Sub lengthcheck(ByVal sender As Object, ByVal args As [Type text]

Page 32

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

ServerValidateEventArgs) Handles CustomValidator1.ServerValidate Dim len As Integer = args.Value.Length If len = 10 Then args.IsValid = True Else args.IsValid = False End If End Sub End Class OUTPUT:-

16. Make usercontrol(.ascx file) and use on usercontroldemo(.aspx) file. Page:- UserControl.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="UserControl.aspx.vb" Inherits="USERCONTROLDEMO._Default" %> <%@ Register TagPrefix="Bhumi" TagName="Greet" Src="~/Greeting.ascx"%> <%@ Register TagPrefix="Bhumi" TagName="Login" Src="~/Login.ascx"%> [Type text]

Page 33

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Page2:- Login.ascx <%@ Control Language="vb" AutoEventWireup="false" CodeBehind="Login.ascx.vb" Inherits="USERCONTROLDEMO.Login" %>

Greeting Information

Enter Username :

Enter Password :

 



Page 2.1:-Login.ascx.vb

Public Partial Class Login Inherits System.Web.UI.UserControl [Type text]

Page 34

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load End Sub Protected Sub btnlogin_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnlogin.Click If txtuname.Text = "Bhumi" And txtpass.Text = "Parekh" Then lbllogin.Text = "Login Successfully" Else lbllogin.Text = "Incorrect Username or Passwords" End If End Sub  End Class Page 3:- Greeting.ascx <%@ Control Language="vb" AutoEventWireup="false" CodeBehind="Greeting.ascx.vb" Inherits="USERCONTROLDEMO.Greeting" %>

Greeting Information

Enter Your Name :

Page 3.1:- Greeting.ascx.vb Public Partial Class Greeting Inherits System.Web.UI.UserControl Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click lblgreet.Text = "Welcome , " & txtgreet.Text End Sub End Class [Type text]

Page 35

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

17. GridView Demo. Page1:- GridviewDemo.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="GridviewDemo.aspx.vb" Inherits="GridViewDemo1._Default" %>

....GRIDVIEW DEMO....

[Type text]

Page 36

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Edit   Delete <PagerStyle BackColor="#C6C3C6" ForeColor="Black" HorizontalAlign="Right" /> <SelectedRowStyle BackColor="#9471DE" Font-Bold="True" ForeColor="White" />

Page:-Gridviewdemo.aspx.vb Partial Public Class _Default Inherits System.Web.UI.Page

[Type text]

Page 37

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Dim plist As New ArrayList() Dim p1 As New Product() p1.pid = 1 p1.pname = "Mouse" p1.mfd = "2 Jul 2018" p1.pimg = "p1.jpg" plist.Add(p1) Dim p2 As New Product() p2.pid = 2 p2.pname = "CPU" p2.mfd = "21 Aug 2018" p2.pimg = "~\\images\\p2.jpg" plist.Add(p2) Dim p3 As New Product() p3.pid = 3 p3.pname = "Key Board" p3.mfd = "5 Dec 2017" p3.pimg = "~\\images\\p3.jpg" plist.Add(p3) Dim p4 As New Product() p4.pid = 4 p4.pname = "Printer" p4.mfd = "18 Apr 2017" p4.pimg = "~\\images\\p4.jpg" plist.Add(p4) GridView1.DataSource = plist GridView1.DataBind() End Sub End Class Class1.vb Public Class Product [Type text]

Page 38

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Private _pid As Integer Public Property pid() As Integer Get Return _pid End Get Set(ByVal value As Integer) _pid = value End Set End Property Private _pname As String Public Property pname() As String Get Return _pname End Get Set(ByVal value As String) _pname = value End Set End Property

Private _mfd As String Public Property mfd() As String Get Return _mfd End Get Set(ByVal value As String) _mfd = value End Set End Property

Private _pimg As String Public Property pimg() As String Get Return _pimg End Get Set(ByVal value As String) _pimg = value End Set [Type text]

Page 39

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

End Property End Class

OUTPUT:-

17(A). GridView Custom Demo. Page:-CustomDemo.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="CustomDemo.aspx.vb" Inherits="GRIDCUSTOMDEMO._Default" %> [Type text]

Page 40

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

....GRIDVIEW CUSTOM DEMO....

[Type text]

Page 41

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Page:-Prod.vb Public Class prod Private _pid As Integer Public Property pid() As Integer Get Return _pid End Get Set(ByVal value As Integer) _pid = value End Set End Property Private _pname As String Public Property pname() As String Get Return _pname End Get Set(ByVal value As String) _pname = value End Set End Property Private _mfd As String Public Property mfd() As String Get Return _mfd End Get Set(ByVal value As String) _mfd = value End Set End Property Private _pimg As String [Type text]

Page 42

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Public Property pimg() As String Get Return _pimg End Get Set(ByVal value As String) _pimg = value End Set End Property End Class OUTPUT:-

18. DataList Custom Demo with Paging. Page:- DatalistDemo.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="DatalistDemo.aspx.vb" Inherits="DataListDemo._Default" %>

....DATALIST DEMO....

Page 43

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

ForeColor="Black" GridLines="Both" RepeatDirection="Horizontal" rel="nofollow"> <SelectedItemStyle BackColor="#000099" Font-Bold="True" ForeColor="White" /> pid:
pname:
price:
qty:
image:

[Type text]

Page 44

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

 OUTPUT:-

19. Repeater Demo. Page:-RepeaterDemo <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="RepeaterDemo.aspx.vb" Inherits="RepeaterDemo._Default" %>

[Type text]

Page 45

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

....REPEATER DEMO....

Prod_ID	Prod_Name

[Type text]

Page 46

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

 20. FormView Demo With Paging. Page:-FormviewDemo.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="FormViewDemo.aspx.vb" Inherits="FormViewDemo01._Default" %>

....FORMVIEW DEMO....

<EditItemTemplate> pid:
pname:
price:
qty:
image:
  pid:
pname:
price:
qty:
image:
[Type text]

Page 48

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

  pid:
pname:
price:
qty:
image:
   



OUTPUT:-

22. Cookie Demo. Page:-Cookie.aspx <%@ Page Language="vb" AutoEventWireup="false" [Type text]

Page 50

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

CodeBehind="Cookie.aspx.vb" Inherits="COOKIEDEMO._Default" %>

Name :

Page:- Cookie.aspx.vb Partial Public Class _Default Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Dim httpCookie As HttpCookie = Request.Cookies("UserInfo") If httpCookie Is Nothing Then txtdiv.Visible = True Else msgdiv.Visible = True End If End Sub Protected Sub btnsignup_Click(ByVal sender As Object, ByVal e As EventArgs) Handles btnsignup.Click Dim httpCookie As New HttpCookie("UserInfo") [Type text]

Page 51

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

httpCookie.Values.Add("ClientName", txtname.Text) httpCookie.Expires = DateTime.Now.AddDays(1) Response.Cookies.Add(httpCookie) Response.Redirect("Welcome.aspx?name=" & txtname.Text) End Sub End Class Page:- WELCOME.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="WELCOME.aspx.vb" Inherits="COOKIEDEMO.WELCOME" %>

Welcome To Our Website :

Page:- WELCOME.aspx.vb Public Partial Class WELCOME Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load lblname.Text = Request.QueryString("name") End Sub End Class

23. ViewState Demo 1 ( Request Increament ). Page:- RequestIncrement.aspx [Type text]

Page 52

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="RequestIncrement.aspx.vb" Inherits="VIEWSTATEDEMO1._Default" %>

...VIEWSTATE FIRST DEMO....



RequestIncrement.aspx.vb

Partial Public Class _Default Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click Dim cnt As Integer If (ViewState("counter") Is Nothing) Then cnt = 1 Else cnt = CType(ViewState("counter"), Integer) + 1 End If [Type text]

Page 53

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

ViewState("counter") = cnt Label1.Text = "counter:" & cnt.ToString() End Sub End Class 

OUTPUT:-

24. CrossPage Posting using Two Page. Page:-1 CrossPage1.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="CrossPage1.aspx.vb" Inherits="CrossPagePostingDemo._Default" %>

...CrossPageDemo...

First Name:

Last Name:

[Type text]

Page 54

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT



Page2:-Crosspage1.aspx.vb

Partial Public Class _Default Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load End Sub Public ReadOnly Property Fullname() As String Get Return TextBox1.Text & " " & TextBox2.Text End Get End Property End Class



Page3:-Crosspage2.aspx

<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="CrossPage2.aspx.vb" Inherits="CrossPagePostingDemo.CrossPage2"%>

[Type text]

Page 55

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Page4:-Crosspage2.aspx.vb Public Partial Class CrossPage2 Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If PreviousPage IsNot Nothing Then Label1.Text = "You Came From Default Page Title:" & PreviousPage.Title Dim prev As _Default prev = TryCast(PreviousPage, _Default) If prev IsNot Nothing Then Label1.Text &= "
You Type: " & prev.Fullname End If End If End Sub End Class OUTPUT:-

25. QueryString Demo. Page1:-QueryStringSender.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="QueryStringSender.aspx.vb" Inherits="QueryStringDemo._Default" %> [Type text]

Page 56

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

QueryStringSender.aspx.vb Partial Public Class _Default Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load If Not IsPostBack Then ListBox1.Items.Add("Econo Sofa") ListBox1.Items.Add("Wheel Chair") ListBox1.Items.Add("Daining Table") ListBox1.Items.Add("Table") End If End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click If ListBox1.SelectedIndex = -1 Then Label1.Text = "ERROR" Else Dim url As String = "QueryStringReceiver.aspx?" & "Item=" & ListBox1.SelectedItem.Text & " Mode= " & CheckBox1.Checked.ToString() Response.Redirect(url) End If End Sub End Class Page2:-QueryStringReceiver.aspx <%@ Page Language="vb" AutoEventWireup="false" [Type text]

Page 57

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

CodeBehind="QueryStringReceiver.aspx.vb" Inherits="QueryStringDemo.QueryStringReceiver" %>

QueryStringReceiver.aspx.vb Public Partial Class QueryStringReceiver Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Label1.Text = "Item:" & Request.QueryString("Item") Label1.Text &= "
" & Request.QueryString("Mode") End Sub End Class 

OUTPUT:-

[Type text]

Page 58

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

26. Session Demo. Page1:-Login.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Login.aspx.vb" Inherits="SESSIONDEMO.Login" %>

....LOGIN....

USERNAME:

PASSWORD :

 

Page2:-Login.aspx.vb Public Partial Class Login Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click [Type text]

Page 59

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

If txtuname.Text = "Bhumi Kishan" And txtpass.Text = "Parekh" Then Session("UserName") = txtuname.Text Session("Password") = txtpass.Text Response.Redirect("index.aspx") Else Session("UserName") = Nothing Session("Password") = Nothing End If End Sub End Class Page3:- Session1.vb Public Class Session1 Inherits System.Web.UI.Page Protected Overloads Sub Oninit(ByVal e As System.EventArgs) If Session("UserName") = Nothing And Session("Password") = Nothing Then Response.Redirect("Login.aspx") End If End Sub End Class Page4:- Index.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Index.aspx.vb" Inherits="SESSIONDEMO.Index" %>

....INDEX PAGE...

LOGOUT

[Type text]

Page 60

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Page5:- Index.aspx.vb Partial Public Class Index Inherits Session1 Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Label1.Text = "WELCOME...!" & Session("UserName") End Sub Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles LinkButton1.Click Session.Abandon() Response.Redirect("Login.aspx") End Sub End Class

27. Insert, Update, Delete and Display using Connected of ADO.NET. Page:-Form1.aspx Imports System.Data.OleDb Public Class Form1 Dim cmd As New OleDbCommand() Dim cn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\kkk\Documents\Visual Studio 2008\Projects\Dbase_stud.mdb") Dim rd As OleDbDataReader Dim gen As Boolean Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Try cn.Open() cmd.Connection = cn cmd.CommandText = "insert into tbl_student values(" & CInt(TextBox1.Text) & ",'" & TextBox2.Text & "','" & TextBox3.Text & "', '" & TextBox4.Text & "'," & CInt(TextBox5.Text) & ")" cmd.ExecuteNonQuery() MessageBox.Show(" Record Saved") [Type text]

Page 61

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Catch ex As Exception MessageBox.Show(ex.Message) Finally cn.Close() End Try 'display() End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Try cn.Open() cmd.Connection = cn cmd.CommandText = "update tbl_student set sname='" & TextBox2.Text & "',address='" & TextBox3.Text & "',city='" & TextBox4.Text & "',pincode='" & TextBox5.Text & "' where sid=" & CInt(TextBox1.Text) & "" cmd.ExecuteNonQuery() MessageBox.Show("Updated") Catch ex As Exception MessageBox.Show(ex.Message) Finally cn.Close() End Try display() End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load display() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Try cn.Open() cmd.Connection = cn cmd.CommandText = "delete from tbl_student where sid=" & CInt(TextBox1.Text) & "" cmd.ExecuteNonQuery() MessageBox.Show("Deleted") Catch ex As Exception MessageBox.Show(ex.Message) Finally cn.Close() End Try [Type text]

Page 62

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

display() End Sub Public Sub display() DataGridView1.Rows.Clear() DataGridView1.Columns.Clear() Try cn.Open() cmd.Connection = cn cmd.CommandText = "select * from tbl_student order by sid desc" rd = cmd.ExecuteReader() DataGridView1.Columns.Add("c1", "Id") DataGridView1.Columns.Add("c2", "Name") DataGridView1.Columns.Add("c3", "Address") DataGridView1.Columns.Add("c4", "City") DataGridView1.Columns.Add("c5", "Pincode") While rd.Read() DataGridView1.Rows.Add(rd(0).ToString(), rd(1).ToString(), rd(2).ToString(), rd(3).ToString(), rd(4).ToString()) End While Catch ex As Exception MessageBox.Show(ex.Message) Finally cn.Close() End Try End Sub End Class OUTPUT:-

[Type text]

Page 63

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

28. Insert, Update, Delete and Display using DisConnected of ADO.NET. Page:-WebForm1.aspx Imports System.Data.OleDb Public Class Form1 Dim cn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\kkk\Documents\Visual Studio 2008\Projects\Dbase_stud.mdb") Dim cmd As New OleDbCommand() Dim rd As OleDbDataReader Dim da As OleDbDataAdapter Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Try cn.Open() cmd.Connection = cn cmd.CommandText = "insert into tbl_student values(" & CInt(TextBox1.Text) & ",'" & TextBox2.Text & "','" & TextBox3.Text & "','" & TextBox4.Text & "'," & CInt(TextBox5.Text) & ")" cmd.ExecuteNonQuery() MessageBox.Show("RECORD SAVED") Catch ex As Exception MessageBox.Show(ex.Message) Finally cn.Close() End Try End Sub Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Try cn.Open() cmd.Connection = cn cmd.CommandText = "update tbl_student set sname='" & TextBox2.Text & "',address='" & TextBox3.Text & "',city='" & TextBox4.Text & "',pincode=" & CInt(TextBox4.Text) & " where sid=" & CInt(TextBox1.Text) & "" cmd.ExecuteNonQuery() MessageBox.Show("UPDATED") Catch ex As Exception MessageBox.Show(ex.Message) Finally cn.Close() [Type text]

Page 64

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

End Try display() End Sub Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Try cn.Open() cmd.Connection = cn cmd.CommandText = "delete from tbl_student where sid=" & CInt(TextBox1.Text) & "" cmd.ExecuteNonQuery() MessageBox.Show("DELETED") Catch ex As Exception MessageBox.Show(ex.Message) Finally cn.Close() End Try display() End Sub Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load display() End Sub Public Sub display() Dim ds As New DataSet da = New OleDbDataAdapter("select* from tbl_student order by sid desc", cn) da.Fill(ds) ComboBox1.DataSource = Nothing ComboBox1.DataSource = ds.Tables(0) ComboBox1.DisplayMember = "sname" ComboBox1.ValueMember = "sid" 'While rd.Read() 'DataGridView1.Rows.Add(rd(0).ToString(), rd(1).ToString(), rd(2).ToString(), rd(3).ToString(), rd(4).ToString()) ' End While End Sub End Class OUTPUT:-

[Type text]

Page 65

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

29. Apply Theme and Skin. Page1:-WebForm1.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="WebForm1.aspx.vb" Inherits="ThemeAndSkinDemo.WebForm1" %>

Select Item Blue Red

[Type text]

Page 66

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Page2:-Red.Master <%@ Master Language="VB" AutoEventWireup="false" CodeBehind="Red.master.vb" Inherits="ThemeAndSkinDemo.Red" %>



Page3:-Blue.Master

<%@ Master Language="VB" AutoEventWireup="false" CodeBehind="Blue.master.vb" Inherits="ThemeAndSkinDemo.Blue" %>

[Type text]

Page 67

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Page3:-Skin1.skin:Blue <%-Default skin template. The following skins are provided as examples only. 1. Named control skin. The SkinId should be uniquely defined because duplicate SkinId's per control type are not allowed in the same theme. 2. Default skin. The SkinId is not defined. Only one default control skin per control type is allowed in the same theme. --%> Page4:-Skin1.skin:Red <%-Default skin template. The following skins are provided as examples only. 1. Named control skin. The SkinId should be uniquely defined because duplicate SkinId's per control type are not allowed in the same theme. 2. Default skin. The SkinId is not defined. Only one default control skin per control type is allowed in the same theme. [Type text]

Page 68

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

--%> page5:-Stylesheet1.css:Blue body { background-color:Blue } Page6:- Stylesheet1.css:Red body { background-color:Red } 

OUTPUT:-

30. Apply Any Two Ajax Concept. Page:-1. Ajaxdemo1.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Ajaxdemo1.aspx.vb" Inherits="AJAXDEMO._Default" %> [Type text]

Page 69

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

 AJAXDEMO:-02 Page:-01.AjaxDemo2.aspx <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Ajaxdemo2.aspx.vb" Inherits="AJAXDEMO.Ajaxdemo2" %>

[Type text]

Page 70

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

 AjaxDemo2.aspx.vb Public Partial Class Ajaxdemo2 Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click System.Threading.Thread.Sleep(3000) Label2.Text = "Welcome..! " & TextBox1.Text End Sub End Class OUTPUT:-

[Type text]

Page 71

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

MINI PROJECT

[Type text]

Page 72

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

LOGIN.ASPX <%@ Page Language="vb" AutoEventWireup="false" CodeBehind="login.aspx.vb" Inherits="sem5journal.login" MasterPageFile="~/Site1.Master"%>

Login

[Type text]

Page 73

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Login
	:
	:

LOGIN.ASPX.VB Public Partial Class login Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load End Sub Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button1.Click If TextBox1.Text = "udit" And TextBox2.Text = "123" Then lblmsg.Text = "Login sucessfully" Response.Redirect("hello.aspx") Else lblmsg.Text = "Login failed" TextBox1.Text = String.Empty TextBox2.Text = String.Empty TextBox1.Focus() End If End Sub Protected Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Button2.Click TextBox1.Text = " " TextBox2.Text = "" TextBox1.Focus() End Sub End Class

[Type text]

Page 74

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

MINI PROJECT

SITE1.MASTER <%@ Master Language="VB" AutoEventWireup="false" CodeBehind="Site1.master.vb" Inherits="sem5journal.Site1" %> <style> h1,h2,h3,h4,h5,h6 {font-family: "Oswald"} body {font-family: "Open Sans"}

[Type text]

Page 75

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

+91 8128186165 [email protected]

ASP.NET Mine Project

Welcome to <span class="w3-tag">My Project

Logo program 1 to 10 program 11 to 25 program 26 to 30 About Us

[Type text]

Page 76

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT

Mine project

About College Our Faculty Events Service Product Contact Search

<script> // Toggle between hiding and showing blog replies/comments document.getElementById("myBtn").click(); function myFunction(id) { var x = document.getElementById(id); if (x.className.indexOf("w3-show") == -1) { x.className += " w3-show"; } else { x.className = x.className.replace(" w3-show", ""); } } function likeFunction(x) {

[Type text]

Page 77

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT x.style.fontWeight = "bold"; x.innerHTML = "✓ Liked"; } <script> // Script for side navigation function w3_open() { var x = document.getElementById("mySidebar"); x.style.width = "300px"; x.style.paddingTop = "10%"; x.style.display = "block"; } // Close side navigation function w3_close() { document.getElementById("mySidebar").style.display = "none"; } // Used to toggle the menu on smaller screens when clicking on the menu button function openNav() { var x = document.getElementById("navDemo"); if (x.className.indexOf("w3-show") == -1) { x.className += " w3-show"; } else { x.className = x.className.replace(" w3-show", ""); } } <script> var myIndex = 0; carousel(); function carousel() { var i; var x = document.getElementsByClassName("mySlides"); for (i = 0; i < x.length; i++) { x[i].style.display = "none"; } myIndex++; if (myIndex > x.length) {myIndex = 1} x[myIndex-1].style.display = "block"; setTimeout(carousel, 9000); } <script> function myMap() { var mapOptions = { center: new google.maps.LatLng(21.1253338, 73.1086546), zoom: 10, mapTypeId: google.maps.MapTypeId.HYBRID } var map = new google.maps.Map(document.getElementById("map"), mapOptions); }

[Type text]

Page 78

VIDYABHARTI TRUST COLLEGE OF BBA & BCA. UMRAKH SUB: ASP JOURNAL MADE BY UDIT <script src="https://maps.googleapis.com/maps/api/js?key=AIzaSyBu916DdpKAjTmJNIgngS6HL_kDIKU0aU&callback=myMap">

[Type text]

Page 79

---

More Documents from "dhiren"

Udit.docx

May 2020 2

Index Doc.docx

May 2020 5

Honeypots (4).ppt

May 2020 6

Microcontroller.docx

May 2020 2

Aspjernal.docx

May 2020 2

Topic.docx

May 2020 1