Foxtable(狐表)用户栏目专家坐堂 → 请教,选择模版表


  共有8539人关注过本帖平板打印复制链接

主题:请教,选择模版表

帅哥哟,离线,有人找我吗?
gygck
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:77 积分:679 威望:0 精华:0 注册:2012/6/12 16:40:00
请教,选择模版表  发帖心情 Post By:2012/7/13 12:39:00 [只看该作者]

Dim drs As DataCol = DataTables("付款管理").DataCols("付款金额")
Dim JINE As Double
JINE=drs("付款金额")
Select Case JINE
    Case >=100
        Dim Book As New XLS.Book(ProjectPath & "Attachments\报表模板_付款通知单-江铜.xls")
        Dim f2 As String = ProjectPath & "Reports\付款通知单-江铜.xls"
        Book.Build()
        Book.Save(f2)
        Dim Proc As New Process
        Proc.File = f2
        Proc.Start()
    Case Else
        Dim Book As New XLS.Book(ProjectPath & "Attachments\报表模板_付款通知单-贵冶.xls")
        Dim fl As String = ProjectPath & "Reports\付款通知单-贵冶.xls"
        Book.Build()
        Book.Save(fl)
        Dim Proc As New Process
        Proc.File = fl
        Proc.Start()
End Select

 回到顶部
总数 14 1 2 下一页