EditForm 属性

       

返回或设置 String 类型的值,该值代表用于编辑 Microsoft FrontPage 中当前列表的表单的相对 URL。编辑表单允许您修改当前列表中的列。可读写。

expression.EditForm

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

说明

默认的文件名为 EditForm.htm。

示例

下列示例显示站点中所有列表的名称以及与其相关联的编辑表单的相对 URL。

Sub ViewEditFormURL()
'Displays the URL of the form
'associated with editing the list

    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.EditForm & vbCr
            Else
                strURL = strURL & lstWebList.Name & "  -  " & _
                lstWebList.EditForm & vbCr
            End If
        Next
        'Display URLs of all editing forms in web
        MsgBox "The relative URLs of the editing forms are:" _
               & vbCr & vbCr & strURL
    Else
        'Otherwise display message to user
        MsgBox "The current web contains no lists."
    End If

End Sub