NewForm 属性

返回或设置 String 类型的值，该值代表用于在 Microsoft FrontPage 的当前列表中添加新内容的表单。可读写。

expression  必选。返回“应用于”列表中的对象之一的表达式。

说明

BasicList 和 Survey 对象的默认文件名是 NewForm.htm。DocumentLibrary 的默认文件名是 Upload.htm。

示例

下列示例显示活动站点中每个列表的名称以及与其相关联的“新建表单”网页的相对 URL。如果活动站点不包含列表，则向用户显示一条消息。

Sub ViewNewFormURL()
'Display the URL of the form
'associated with adding new content

    Dim lstWebList As List
    Dim strURL As String

    If Not ActiveWeb.Lists Is Nothing Then
        'Cycle through lists and add URLs to string
        For Each lstWebList In ActiveWeb.Lists
            If strURL = "" Then
                strURL = lstWebList.Name & "  -  " & _
                lstWebList.NewForm & vbCr
            Else
                strURL = strURL & lstWebList.Name & "  -  " & _
                lstWebList.NewForm & vbCr
            End If
        Next
        'Display URLs of all New forms in web
        MsgBox "The relative URLs of the New forms are:" _
               & vbCr & vbCr & strURL
    Else
        'Otherwise display message to user
        MsgBox "The current web contains no lists."
    End If

End Sub