主题：关于照片直接引用的问题

没看懂

设置DataColChanged代码就行：

 

 

If e.DataCol.Name = "姓名" Then

   e.DataRow("照片") = e.DtaRow("姓名") & ".jpg"

End If

不用谢，罚你回头再看3篇帮助。

兄弟，错误提示如此清楚啊，都告诉你哪一行，哪个单词有问题了呢。

 

Dtarow错了，我手误，应该是DataRow

 

http://www.foxtable.com/dispbbs.asp?boardid=2&Id=7121

 

 

那些高手和你一样，只是比你多看了几篇帮助而已。

 

个别高手的代码你是不用管的，只管用就行，.net的帮助全部打印出来，有几层楼高，你看不完的。

既然可以获得文件名，你就可以对每个文件名进行判断，看看是否符合条件：
 
For Each File As String In FileSys.GetFiles("C:\")
    If File.StartsWith("BEN3599") Then
        Output.Show(File)
    End If
Next
 

说明条件不对啊，不会有别的原因。

For Each File As String In FileSys.GetFiles("C:\")
    If Filesys.GetName(File).StartsWith("BEN3599") Then
        Output.Show(File)
    End If
Next

晕，你的代码明明就是只取最后一个文件啊。

 

如果要所有的文件，应该这样

Dim Val As String

If e.DataCol.Name = "第一列" Then
    For Each File As String In FileSys.GetFiles("D:\跟单系统外部数据\Attachments\规格")
         If Filesys.GetName(File).StartsWith(e.Datarow("第一列")) Then
              Val = val & vbcrlf & File
         End iF
    next
    e.Datarow("第八列")= File
End If