Free Hotel Management - Checking out a guest

Submitted by: 
Visitors have accessed this post 43930 times.

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

 

 


Comments

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.

nice

when i open check out report it asking username and password where can i find pass words ?

can u anw my Q soonnnnnnnnnnn ?

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

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

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

where can i get the crystal report 8.5

how can i get the crystal report 8.5

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.

I don't know if you can find crystal reports on the net now.

this is link i upload the screenshot
direct link ---http://img18.imageshack.us/img18/5764/serverdontopen.png

short link--
http://yfrog.com/0iserverdontopenp

Are you using crystal reports 8.5?

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

whichprogramming language is this?

Kindly capture the screenshot of the error. Upload it to http://imageshack.us/ and paste the link here.

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

The VB 6.0 version or the .NET?

I think only the .NET version has the problem. I am working around this already.

i use VB version 6

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.

greaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaat job !!!!!

 

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?

Please follow this link to see the screenshot of the inventory view.

Add new comment

Filtered HTML

  • Web page addresses and e-mail addresses turn into links automatically.
  • You may insert videos with [video:URL]
  • Allowed HTML tags: <a> <em> <strong> <cite> <blockquote> <code> <ul> <ol> <li> <dl> <dt> <dd> <table> <tr> <td> <th> <img> <h1> <h2> <h3> <iframe> [video]
  • You can enable syntax highlighting of source code with the following tags: <code>, <blockcode>, <asp>, <c>, <cpp>, <csharp>, <css>, <html4strict>, <java>, <javascript>, <mysql>, <php>, <python>, <sql>, <vb>, <vbnet>. The supported tag styles are: <foo>, [foo].
  • Lines and paragraphs break automatically.

Plain text

  • No HTML tags allowed.
  • Lines and paragraphs break automatically.
CAPTCHA
This question is for testing whether or not you are a human visitor and to prevent automated spam submissions.