帆软文件控件上传多文件

要实现在帆软中上传多个文件，可以使用文件上传控件，并设置其允许多选。具体步骤如下：

1. 在报表中将文件上传控件拖入需要上传文件的位置。

2. 右键单击文件上传控件，选择“控件属性”。

3. 在“常规”选项卡中，将“多选”属性设置为“是”。

4. 在“数据”选项卡中，设置数据类型为“二进制流”。

5. 在“事件”选项卡中，选择“上传成功后执行”的事件，然后单击“编辑”按钮。

6. 在事件编辑器中，可以使用 VBScript 代码来处理上传的文件。例如，可以使用以下代码保存上传的文件到服务器：

Dim uploadPath
uploadPath = Server.MapPath("uploads\")
For Each file In Request.Files
    If file.Size > 0 Then
        file.SaveAs uploadPath & file.FileName
    End If
Next

7. 保存报表并预览，就可以在文件上传控件中选择并上传多个文件了。上传成功后，可以在服务器指定的目录中找到上传的文件。

相关问题

帆软报表 文本控件上传多文件后，把多文件传递数据库

可以通过以下步骤将多个文件上传到数据库中：

1. 在文本件中选择多个文件并上传到服务器上。
2. 将上传的文件名和路径保存到一个字符串中。
3. 将字符串插入到数据库中的相应字段中。

以下是一个简单的示例代码：

// 获取上传的文件路径和文件名
string filePaths = Request.Form["txtFilePaths"];

// 将文件路径和文件名保存到数据库中
SqlConnection conn = new SqlConnection("Data Source=YourServer;Initial Catalog=YourDatabase;Integrated Security=True");
SqlCommand cmd = new SqlCommand("INSERT INTO Files (FilePaths) VALUES (@FilePaths)", conn);
cmd.Parameters.AddWithValue("@FilePaths", filePaths);
conn.Open();
cmd.ExecuteNonQuery();
conn.Close();

在上面的示例代码中，假设上传的文件路径和文件名已经保存在名为 `txtFilePaths` 的文本控件中，并且需要将它们插入到名为 `Files` 的表中的 `FilePaths` 字段中。代码首先获取了 `txtFilePaths` 的值，然后插入到数据库中，使用 `SqlParameter` 防止 SQL 注入攻击。

需要注意的是，该示例代码只演示了如何将多个文件的路径和文件名保存到数据库中，实际应用中还需要考虑文件上传的安全性和可扩展性。

帆软报表 文本控件上传多文件后，通过按钮控件，更新字段，多文件传递数据库

你可以通过以下步骤实现：

1. 在报表中添加一个文本框控件和一个按钮控件。

2. 在文本框控件的“事件-脚本-文本框失去焦点”事件中，获取文本框中的文件路径，将文件上传到服务器，并将上传成功后返回的文件路径保存到一个变量中。

3. 在按钮控件的“事件-脚本-按钮被单击”事件中，将保存在变量中的文件路径更新到数据库中。

以下是一个简单的示例代码：

' 文本框失去焦点事件
Sub TextBox1_LostFocus
    ' 获取文件路径
    Dim filePath As String
    filePath = TextBox1.Text
    
    ' 上传文件到服务器
    Dim serverPath As String
    serverPath = UploadFile(filePath)
    
    ' 保存上传后的文件路径
    Session("filePaths") = Session("filePaths") & ";" & serverPath
End Sub

' 按钮被单击事件
Sub Button1_Click
    ' 更新数据库中的文件路径
    Dim filePaths As String
    filePaths = Session("filePaths")
    
    ' 将多个文件路径拆分成数组
    Dim filePathArr() As String
    filePathArr = Split(filePaths, ";")
    
    ' 循环更新每个文件路径到数据库中
    For i = 0 To UBound(filePathArr)
        UpdateFilePath(filePathArr(i))
    Next
    
    ' 清空保存文件路径的变量
    Session("filePaths") = ""
End Sub

' 上传文件到服务器
Function UploadFile(filePath)
    ' 实现文件上传的代码
    ' ...
    ' 返回上传后的服务器路径
    Return "/uploads/file1.pdf"
End Function

' 更新文件路径到数据库中
Sub UpdateFilePath(filePath)
    ' 实现更新数据库的代码
    ' ...
End Sub

注意，以上代码仅供参考，具体实现需要根据你的实际情况进行调整。另外，文件上传和更新数据库的具体实现方式也需要根据你使用的技术来确定。