Free Hotel Management - Checking out a guest

Checking out a guest

 

Check Out

 

Click Check Out if balance is equal to zero (0.00), otherwise click Amount Paid to post charges. Statement of Account will be printed after confirmation as shown below.

 

Statement of Account

 

Back to table of contents

 

 

I have checked your hotel reservation software. I really appreciate the work done. I am very much interested in the inventory view (room chart) which seems not to be working. Maybe am not doing something wright, can u please be of help?

hai..im succesful download ur system,,but after the guest checkout, im have a problem to print bill.....it say server has not yet been open..ples help me

In reply to by Anonymous (not verified)

The VB 6.0 version or the .NET? I think only the .NET version has the problem. I am working around this already.

In reply to by admin

i use VB version 6

In reply to by Anonymous (not verified)

I don't think it has a problem with VB 6.0. If you can kindly create a screenshot and upload it to any website that host images then make a reference of that picture here.

im edit ur hotel management system, i have done delete all information about company,id type,business and vehicle.the system still ok but when i want print report..it say server has not yet been opened..i think it relationship with account receivable...how i can solve it...below the coding i adjust at frmreport..i use vb 6. Select Case strReport Case "Folio" Set mReport = mTest.OpenReport(App.Path & "\Reports\rpt_Folio.rpt") mReport.RecordSelectionFormula = strWhere Set mParam = mReport.ParameterFields mParam.Item(1).AddCurrentValue CurrBiz.BUSINESS_NAME mParam.Item(2).AddCurrentValue CurrBiz.BUSINESS_ADDRESS mParam.Item(3).AddCurrentValue CurrBiz.BUSINESS_CONTACT_INFO 'Case "Account Receivable" 'Set mReport = mTest.OpenReport(App.Path & "\Reports\rpt_Account_Receivable.rpt") ' If frmRPTAccRec.dcCompany.Text > "" Then ' mReport.RecordSelectionFormula = "{qry_Account_Receivable.Company} = '" & frmRPTAccRec.dcCompany.Text & "'" ' End If 'Set mParam = mReport.ParameterFields 'mParam.Item(1).AddCurrentValue CurrBiz.BUSINESS_NAME 'mParam.Item(2).AddCurrentValue CurrBiz.BUSINESS_ADDRESS 'mParam.Item(3).AddCurrentValue CurrBiz.BUSINESS_CONTACT_INFO Case "Other Charges" Set mReport = mTest.OpenReport(App.Path & "\Reports\rpt_Other_Charges.rpt") mReport.RecordSelectionFormula = strWhere Set mParam = mReport.ParameterFields mParam.Item(1).AddCurrentValue CurrBiz.BUSINESS_NAME mParam.Item(2).AddCurrentValue CurrBiz.BUSINESS_ADDRESS mParam.Item(3).AddCurrentValue CurrBiz.BUSINESS_CONTACT_INFO Case "CheckIn Guest" Set mReport = mTest.OpenReport(App.Path & "\Reports\rpt_CheckIn_Guest.rpt") Set mParam = mReport.ParameterFields mParam.Item(1).AddCurrentValue CurrBiz.BUSINESS_NAME mParam.Item(2).AddCurrentValue CurrBiz.BUSINESS_ADDRESS mParam.Item(3).AddCurrentValue CurrBiz.BUSINESS_CONTACT_INFO Case "Check Out" Set mReport = mTest.OpenReport(App.Path & "\Reports\rpt_CheckOut.rpt") mReport.RecordSelectionFormula = strWhere Set mParam = mReport.ParameterFields mParam.Item(1).AddCurrentValue CurrBiz.BUSINESS_NAME mParam.Item(2).AddCurrentValue CurrBiz.BUSINESS_ADDRESS mParam.Item(3).AddCurrentValue CurrBiz.BUSINESS_CONTACT_INFO Case "Due Reservation" Set mReport = mTest.OpenReport(App.Path & "\Reports\rpt_Due_Reservation.rpt") mReport.RecordSelectionFormula = strWhere Set mParam = mReport.ParameterFields mParam.Item(1).AddCurrentValue CurrBiz.BUSINESS_NAME mParam.Item(2).AddCurrentValue CurrBiz.BUSINESS_ADDRESS mParam.Item(3).AddCurrentValue CurrBiz.BUSINESS_CONTACT_INFO

this is link i upload the screenshot direct link ---http://img18.imageshack.us/img18/5764/serverdontopen.png short link-- http://yfrog.com/0iserverdontopenp

im just Download Hotel Management System v1.0 Installer and think it complete with srytal report viewer...when i check the report folder,..i cant open it..how i can get crystal report 8.5? tq mister...i am very apprcate it.

how can i get the crystal report 8.5

where can i get the crystal report 8.5

hi, i've got vb2005 is there a version of the system in vb2005 ??? thanx

fantastic code.... but can u plz send me the database password and a data flow diagram in the id given below [email protected]

I cant see the check out form when i run the software. From which Menu?

nice

I need some vb.net code for printing. Like after check out from hotel generate bill or current text box field value with a format or crystal report printing can any one help me. Please send code into [email protected]. Please help.

Add new comment