主题：请教

想在这个表的“照片”列写入用这个表“姓名”列命名的文件名，怎么不行呢？

 

Tables("住宿生信息").Current("照片") = Tables("住宿生信息").Current("姓名") & ".JPG")

去掉最后一个括号

c.Save(ProjectPath & "\\192.168.101.251\共享数据\住宿生信息\学生照片" & Tables("住宿生信息").Current("姓名") & ".JPG")     '保存文件

 

上面的代码出现下面的错误，请问怎么办。

 

.NET Framework 版本：2.0.50727.8793
Foxtable 版本：2018.8.30.1
错误所在事件：窗口,拍照窗口,Button1,Click
详细错误信息：
GDI+ 中发生一般性错误。

改成
 
c.Save("\\192.168.101.251\共享数据\住宿生信息\学生照片" & Tables("住宿生信息").Current("姓名") & ".JPG")  
 
如果还报错，就是你对应路径的文件夹不存在。

请各位老师帮忙看看这段代码应怎么改呢。目的就是想把拍照的相片保存在：\\192.168.101.251\共享数据\住宿生信息\学生照片\" & Tables("住宿生信息").Current("姓名") & ".JPG")

它不报错但也不保存怎么办。文件目录是存在的。

 

Dim c As new camera
Dim pic As WinForm.PictureBox = e.Form.Controls("PicView2")
Dim img As Image
e.Form.TimerEnabled = False
If pic.Image IsNot Nothing
    Dim buffer() As Byte = Functions.Execute("GetImageToBytes",pic.Image)
    Dim result As Integer = Functions.Execute("SaveBytesToFile",buffer,e.Form.Controls("FileName").Value)
    If result = 1
c.Save("\\192.168.101.251\共享数据\住宿生信息\学生照片\" & Tables("住宿生信息").Current("姓名") & ".JPG") '保存文件
        MessageBox.Show("照片保存为: " & e.Form.Controls("FileName").Value ,"保存成功")
        e.Form.Close()
    Else
        MessageBox.Show("保存失败","失败")
    End If
Else
    MessageBox.Show("请先拍照!","错误")
End If
e.Form.TimerEnabled = True

改成别的路径是否可以？

 

c.Save("d:\" & Tables("住宿生信息").Current("姓名") & ".JPG") '保存文件