Unable to create list using ApplicationPage.aspx

Question

I intend to create list using code. So I used an empty SharePoint project and in that I used the ApplicationPage.aspx. In that I wrote the following code:

using(SPSite siteColl=new SPSite(@"http://diplsp:1090/"))
            {
                SPWeb webSite = siteColl.OpenWeb();
                webSite.Lists.Add("Leave Form1", "", webSite.ListTemplates["Calendar"]);

                SPList leaveList = webSite.Lists["Leave Form"];

                leaveList.OnQuickLaunch = true;
                leaveList.Fields.Add("Start Date", SPFieldType.DateTime, true);

                leaveList.Update();
            }

So according to the above code I should see the list created on my quick launch, but its not happening. However if I use the console application or list feature the above code works perfectly.

Please suggest.

Answer 1

Not sure that Leave Form1 (when adding list) and Leave Form (when getting list) is issue here but this code works for me:

    using(SPSite site = new SPSite("http://diplsp:1090/"))
    {
        using(SPWeb web = site.OpenWeb())
        {
            web.Lists.Add("Leave Form1", "", web.ListTemplates["Calendar"]);
            SPList list = web.Lists["Leave Form1"];
            list.OnQuickLaunch = true;
            list.Fields.Add("Start Date", SPFieldType.DateTime, true);
            list.Update();
        }
    }

And if you want to be sure no errors are generated you need to check if your list exist before adding it.

Btw. You always need to dispose SPWeb object (when you are finished with it) either by putting it in using (like in my code) or by calling web.Dispose()