诱人的老师中文字幕在线观看

Lynnmouse
藍之初性別保密 UID 139	精華 0 帖子 490 積分 124 詳情	閱讀權限 30 註冊 2006-6-24 來自狀態離線

#1

大中小

使用道具

發表於 2007-8-23 08:05 PM 資料個人空間短訊加為好友

緊急～MS Access的一堆問題～

X-Seek
此 X-Seek 主題價值 100 XS。 X-Seek 出題者 Lynnmouse 希望能在 2007-8-26 08:05 PM 前尋找到解決方案。已於 2007-8-27 06:49 PM 由 Lynnmouse 選出最合適的解決方案及關閉 X-Seek 主題。

救救我

請問

Resort Reservation System

我做個receipt，從form要link到report
我用reserveID, Auto Number type
但是不能open the report

為什么

如果用 customer i/c number

不同的日期訂房間的話...link不到我要的地方～

要怎樣用auto number type的reserveID link 到receipt?

[Copy to clipboard] [ - ]

CODE:

Private Sub cmdPrint_Click()
On Error GoTo Err_Print

DoCmd.OpenReport "RPT Receipt", acViewPreview, , "Cust_IC='" & Cust_IC & "'"

Exit_Print:
         Exit Sub

Err_Print:
         MsgBox "CANNOT Print this Receipt!"
         Resume Exit_Print
End Sub

還有一個問題

我想要在report里面算總收入
是不是在report footer
用text box
=Sum(Amount)

謝謝

[ 觀看解決方案 ]

最後編輯: winniemouse : 2007-8-23 08:06 PM

mickeyGoUp
版主性別男 UID 5	精華 0 帖子 35511 積分 5235 詳情	閱讀權限 150 註冊 2006-3-24 來自美國滴滴尼狀態離線

#2

大中小

使用道具

發表於 2007-8-23 10:28 PM 資料個人空間短訊加為好友

首先﹐reserveID 那個問題﹐您所說的 "能open the report" 是指甚麼呢? Access 有沒有顯示甚麼 error message 呢? 可能您需要提供 table 資料和 report 資料﹐我們才可進一步幫助您。

至於總收入﹐單用 sum() 是做不到的。假設您的 report 有 price 這個 column﹐而您想計算 price 的 sum﹐您需要:

1. 先在Report Footer 加入 text field: 名字: txtTotalNum
2. 在 page header 的 Print event 加入:

[Copy to clipboard] [ - ]

CODE:

Private Sub PageHeaderSection_Print(Cancel As Integer, PrintCount As Integer)
txtTotalNum = 0
End Sub

3. 再 detail 的 Print event 加入:

[Copy to clipboard] [ - ]

CODE:

Private Sub Detail_Print(Cancel As Integer, FormatCount As Integer)
If PrintCount = 1 Then
txtTotalNum = txtTotalNum + price
End If
End Sub

Total 便會顯示在 txtTotalNum 那個 text field 內了。

X-Seek 解決方案 1/3 [ 觀看下一個解決方案 ]

想有XG幫你加分，快來『體育遊戲區』，考你眼光，增加你對體育的認識。

Lynnmouse
藍之初性別保密 UID 139	精華 0 帖子 490 積分 124 詳情	閱讀權限 30 註冊 2006-6-24 來自狀態離線

#3

大中小

使用道具

發表於 2007-8-23 11:55 PM 資料個人空間短訊加為好友

QUOTE:

原帖由 mickeyGoUp 於 2007-8-23 10:28 PM 發表

首先﹐reserveID 那個問題﹐您所說的 "能open the report" 是指甚麼呢? Access 有沒有顯示甚麼 error message 呢? 可能您需要提供 table 資料和 report 資料﹐我們才可進一步幫助您。

至於總收入﹐單用 sum() 是做不到 ...

sum的終于解決了

我所謂的open report是... 開那receipt
顯示的error message就是"CANNOT Open This Receipt!!"
我的MsgBox

TBL reservation里面有
ReserveID    Auto Number
RoomNo    Text
Cust_IC       Text
StaffID       Text
Check_In    Date/Time
Check_Out Date/Time
ReserveDate  Date/Time
Deposit       Currency

RPT Receipt是利用QRY Receipt,里面有
RoomNo
Cust_IC
Check_In
Check_Out
ReserveDate
Deposit
ReserveID
Name
RentPrice

想有XG幫你加分，快來『體育遊戲區』，考你眼光，增加你對體育的認識。