Access Denied while accessing SPWeb class

Hi experts can any one resolve my following error:

code as follows:

Dim mysite As New SPSite(“http://mysitetest:5678″)

Dim web As SPWeb = mysite.RootWeb

MsgBox(web.Name.ToString)

I am getting “Access Denied” at msgbox execution