It generates different types of bills. Multiple user can use this system.
User Friendly reports and bills. Modify records easily.
Download
User Friendly reports and bills. Modify records easily.
Download
Hospital Management System
| |||||||||||
The Health Care Management system is a window based or stand alone application designed with ASP.Net to keep records of patient in and out of a clinic. It is also designed to keep records of staffs in the clinic and report generation is also available for hard copy documentation if needed.
This Project can be used to keep track of the patients registering in a hospital or clinic. Also this system supports accessing the previous visit histories of any patient, search for patients by name and other properties etc. Health Care Management system will support registering patients.
Users of this software can search for patients by name, admission date, discharge date etc. Users can view the previous visit histories of any patient. This system can maintain the list of doctors in the hospital and also can maintain the list of beds/rooms available in the hospital. Patients are categorized into "In Patients" and "Out Patients".
Modules:
Tools Used:
download Project Report and paper presention of CSE Hospital management VB project. |
cShredder
class is almost completely Win32 driven, using virtual memory buffers and the WriteFile
API to overwrite the file with several passes of 0s, 1s, and random data. After some initial preamble of file path checks, attribute stripping, and enabling key access tokens within the process, we create the buffer:... hFile = CreateFileW(pName, GENERIC_ALL, FILE_SHARE_NONE, IntPtr.Zero, OPEN_EXISTING, WRITE_THROUGH, IntPtr.Zero); // get the file size nFileLen = fileSize(hFile); if (nFileLen > BUFFER_SIZE) nFileLen = BUFFER_SIZE; if (hFile.ToInt32() == -1) return false; // set the table SetFilePointerEx(hFile, 0, IntPtr.Zero, FILE_BEGIN); pBuffer = VirtualAlloc(IntPtr.Zero, nFileLen, MEM_COMMIT, PAGE_READWRITE); if (pBuffer == IntPtr.Zero) return false; // fill the buffer with zeros RtlZeroMemory(pBuffer, nFileLen); ...
overwriteFile
method that uses WriteFile
to overwrite the contents in buffered 'chunks'. Note that the file was opened with the WRITE_THROUGH
flag, which causes the file to be written through the buffers and straight to disk. Also, all APIs used are of the 'W' flavor, so the shredder should be fully Unicode compliant.private Boolean overwriteFile(IntPtr hFile, IntPtr pBuffer) { UInt32 nFileLen = fileSize(hFile); UInt32 dwSeek = 0; UInt32 btWritten = 0; try { if (nFileLen < BUFFER_SIZE) { SetFilePointerEx(hFile, dwSeek, IntPtr.Zero, FILE_BEGIN); WriteFile(hFile, pBuffer, nFileLen, ref btWritten, IntPtr.Zero); } else { do { SetFilePointerEx(hFile, dwSeek, IntPtr.Zero, FILE_BEGIN); WriteFile(hFile, pBuffer, BUFFER_SIZE, ref btWritten, IntPtrZero); dwSeek += btWritten; } while ((nFileLen - dwSeek) > BUFFER_SIZE); WriteFile(hFile, pBuffer, (nFileLen - dwSeek), ref btWritten, IntPtr.Zero); } // reset file pointer SetFilePointerEx(hFile, 0, IntPtr.Zero, FILE_BEGIN); // add it up if ((btWritten + dwSeek) == nFileLen) return true; return false; } catch { return false; } }
private Boolean randomData(IntPtr pBuffer, UInt32 nSize) { IntPtr iProv = IntPtr.Zero; try { // acquire context if (CryptAcquireContextW(ref iProv, "", MS_ENHANCED_PROV, PROV_RSA_FULL, CRYPT_VERIFYCONTEXT) != true) return false; // generate random block if (CryptGenRandom(iProv, nSize, pBuffer) != true) return false; return true; } finally { // release crypto engine if (iProv != IntPtr.Zero) CryptReleaseContext(iProv, 0); } }
RtlCompareMemory
:private Boolean writeVerify(IntPtr hFile, IntPtr pCompare, UInt32 pSize) { IntPtr pBuffer = IntPtr.Zero; UInt32 iRead = 0; try { pBuffer = VirtualAlloc(IntPtr.Zero, pSize, MEM_COMMIT, PAGE_READWRITE); SetFilePointerEx(hFile, 0, IntPtr.Zero, FILE_BEGIN); if (ReadFile(hFile, pBuffer, pSize, ref iRead, IntPtr.Zero) == 0) { if (InError != null) InError(004, "The file write failed verification test."); return false; // bad read } if (RtlCompareMemory(pCompare, pBuffer, pSize) == pSize) return true; // equal return false; } finally { if (pBuffer != IntPtr.Zero) VirtualFree(pBuffer, pSize, MEM_RELEASE); } }
private Boolean zeroFile(IntPtr pName) { for (Int32 i = 0; i < 10; i++) { IntPtr hFile = CreateFileW(pName, GENERIC_ALL, FILE_SHARE_NONE, IntPtr.Zero, OPEN_EXISTING, WRITE_THROUGH, IntPtr.Zero); if (hFile == IntPtr.Zero) return false; SetFilePointerEx(hFile, 0, IntPtr.Zero, FILE_BEGIN); // unnecessary but.. FlushFileBuffers(hFile); CloseHandle(hFile); } return true; } private Boolean renameFile(string sPath) { string sNewName = String.Empty; string sPartial = sPath.Substring(0, sPath.LastIndexOf(@"\") + 1); Int32 nLen = 10; char[] cName = new char[nLen]; for (Int32 i = 0; i < 30; i++) { for (Int32 j = 97; j < 123; j++) { for (Int32 k = 0; k < nLen; k++) { if (k == (nLen - 4)) sNewName += "."; else sNewName += (char)j; } if (MoveFileExW(sPath, sPartial + sNewName, MOVEFILE_REPLACE_EXISTING | MOVEFILE_WRITE_THROUGH) != 0) sPath = sPartial + sNewName; sNewName = String.Empty; } } // last step: delete the file if (deleteFile(sPath) != true) return false; return true; }
/p
', that enables the paranoid mode. With this setting, after the overwrite cycles, the files object identifier is deleted, effectively orphaning the file from the file and security subsystems:private Boolean orphanFile(IntPtr pName) { UInt32 lpBytesReturned = 0; IntPtr hFile = CreateFileW(pName, GENERIC_WRITE, FILE_SHARE_NONE, IntPtr.Zero, OPEN_EXISTING, WRITE_THROUGH, IntPtr.Zero); if (DeviceIoControl(hFile, FsctlDeleteObjectId, IntPtr.Zero, 0, IntPtr.Zero, 0, out lpBytesReturned, IntPtr.Zero)) return false; return true; }
File Name | Size |
---|---|
Image to text.exe | 37376 |
Image to text.pdb | 60928 |
Image to text.vshost.exe | 14328 |
Image to text.vshost.exe.manifest | 490 |
Image to text.xml | 125 |
Form1.Designer.vb | 10282 |
Form1.resx | 8914 |
Form1.vb | 24557 |
Image to text.vbproj | 5169 |
Image to text.vbproj.user | 74 |
Application.Designer.vb | 1518 |
Application.myapp | 510 |
AssemblyInfo.vb | 1195 |
Resources.Designer.vb | 2803 |
Resources.resx | 5612 |
Settings.Designer.vb | 3050 |
Settings.settings | 279 |
Afterword_Apple.Form1.resources | 180 |
Afterword_Apple.Resources.resources | 180 |
Image to text.exe | 37376 |
Image to text.pdb | 60928 |
Image to text.vbproj.FileListAbsolute.txt | 3063 |
Image to text.vbproj.GenerateResource.Cache | 847 |
Image to text.xml | 125 |
My Project.Resources.Designer.vb.dll | 7680 |
Image to text.sln | 929 |
Image to text.suo | 17920 |
print screen.JPG | 35348 |
Thumbs.db | 6656 |
untitled.JPG | 37670 |
Attachment | Size |
---|---|
32724.zip | 149.93 KB |