我是有退出报表的,但执行的时候弹错误显示我的“D:\照片上传\中转文件\中转.doc”报表路径被占用
我一直找不到办法解决这个问题,难道这个SHOW或者QUIT方法不管用嘛,我Adf2.SHOW ()和Adf2.QUIT ()都试过了
For LIE =0 To 26
For HANG =0 To 2000
dr("位置光标") = sheet(LIE,HANG).Text
If dr("位置光标")IsNot Nothing Then
Dim tm2 As String = "D:\照片上传\中转文件\中转.doc"
Dim bgwjm2 As String = "D:\照片上传\中转文件\中转.doc"
Dim GBZ As String = dr("位置光标")
Dim wzgb = "{" & LIE & "," & HANG & "}"
Dim adf2 As New WordReport(Tables("照片上传"),tm2,bgwjm2)
Adf2.Replace(WZGB, GBZ)
Adf2.Build()
Adf2.SHOW ()
End If
Next
Next