Information, Communication, Social Networking, Crime,...

The unit in SIBT called ITEC104, was intended to make students recognize the world we live in. The web is one of the primary effects in our lives and this might be decidedly or even contrarily. In this essay, there will be focuses from accessibility of information, communication, social networking, privacy, crime, literacy, censorship and ethics. Through these focuses there will be data on how it has affected our lives and if there are certain or negative effects in our lives. The accessibilty of data on the web is anything but difficult to any internet user, as anybody can go onto any web program and hunt down whatever they are searching for, however as this happens it will bring about more issues and/or positives with memory or knowledge. While hunting down data this can expand the knowledge of the specific thing that they are searching for, or certainties that are useful towards the user, with this they can research about their reports, essays and even individuals. With the measure of data individuals put into the web, the more less demanding it is to discover data on users, for instance, if Richelle needed to search for a companions birthday, she can seek on google, Veronica Latu and a list of sites will show up and undoubtedly will be useful to Richelle to discover Veronica s birthday on one or numerous destinations. Access to data is essential for education and enhancing lives. Not having access to the web is like not having fundamental tutoring; it extensivelyShow MoreRelatedEthics of Information Communication Technology (Ict)27618 Words   |  111 Pages239 ETHICS OF INFORMATION COMMUNICATION TECHNOLOGY (ICT) Paper prepared by Tengku Mohd T. Sembok, Universiti Kebangsaan Malaysia for the Regional Meeting on Ethics of Science and Technology 5-7 November 2003, Bangkok UNESCO Regional Unit for Social Human Sciences in Asia and the Pacific (RUSHSAP) 241 ETHICS OF INFORMATION COMMUNICATION TECHNOLOGY (ICT) 1. INTRODUCTION Globalization and digital convergence in the emerging knowledge society has raised complex ethical, legal andRead MoreGp Essay Mainpoints24643 Words   |  99 PagesNOTES 2010 (ESSAY) Content Page 1. Media a. New vs. Traditional b. New: narcissistic? c. Government Censorship d. Profit-driven Media e. Advertising f. Private life of public figures g. Celebrity as a role model h. Blame media for our problems i. Power + Responsibility of Media j. Media ethics k. New Media and Democracy 2. Science/Tech a. Science and Ethics b. Government and scientist role in science c. Rely too much on technology? d. Nuclear technologyRead MoreInternational Management67196 Words   |  269 Pagestougher with companies in terms of oversight and accountability. The advent of social networking and other media has transformed the way citizens interact and how businesses market, promote, and distribute their products globally. The same can be said for mass collaboration efforts occurring through digital, online technology for the development of new and innovative systems, products, and ideas. Both social networking and mass collaboration bring new power and influence to individuals across bordersRead MoreLibrary Management204752 Words   |  820 PagesLibrary and Information Center Management Recent Titles in Library and Information Science Text Series Library and Information Center Management, Sixth Edition Robert D. Stueart and Barbara B. Moran United States Government Information: Policies and Sources Peter Hernon, Harold C. Relyea, Robert E. Dugan, and Joan F. Cheverie Library Information Systems: From Library Automation to Distributed Information Access Solutions Thomas R. Kochtanek and Joseph R. Matthews The Complete Guide to AcquisitionsRead MoreBusiness Journalism in India26104 Words   |  105 PagesAGMs window dressing of balance sheets, the loopholes (the case of Satyam) (5) 5 Stock exchange, Sensex and its ups and downs, need for stricter monitoring, how to (5) cover Stock Exchanges, qualities of a good stock exchange reporter 6 Ethics for business journalism. Should it be a watch dog or servant of business houses? (5) Role of freebies, junkets, five star attractions and need to resist them 7 Magazine journalism: The Indian scene, eclipse of the general interest magazines, (5)Read MoreOne Significant Change That Has Occurred in the World Between 1900 and 2005. Explain the Impact This Change Has Made on Our Lives and Why It Is an Important Change.163893 Words   |  656 Pages(paper : alk. paper)—ISBN 978-1-4399-0271-4 (electronic) 1. History, Modern—20th century. 2. Twentieth century. 3. Social history—20th century. 4. World politics—20th century. I. Adas, Michael, 1943– II. American Historical Association. D421.E77 2010 909.82—dc22 2009052961 The paper used in this publication meets the requirements of the American National Standard for Information Sciences—Permanence of Paper for Printed Library Materials, ANSI Z39.48-1992 Printed in the United States of America

Racism The World Major Issues Today - 1013 Words

Even though racism is one of the world major issues today. Some individuals may say racism come from ignorance the condition of being uneducated, unaware or uniformed. A lot of attitude is shaped when individuals are young, they believe that it is natural to spend time with people that have the same interest and background culture like theirs. They judge people from different racial background, by the way look, act, and the by clothes they wear, also individuals are targeted by the music they listen to, and how smart they are. One main factor is, frustration Individual feel angry or frustrated, and often look for someone else to blame. In many way individual are racist toward each other. When individual feels threatened when thing they cherish such as culture, territory, family and identity is in danger of being harmed they become prejudice toward others forming unreasonable feelings, opinions, or attitudes, regarding an ethnic, racial, social, or religious groups. Whether rac ism is in school, employment, communities or religion, we need to look toward a solution to resolving this issue. In America what are some causes of racism. First, the causes of racism in America begin with frustrations it tends to increase aggression toward other. If an individual is having some problem, they tend to get angry with people who are not even concerned with their situation. For instance, when a person is having a tough time in the economy, they find it easy to blame other forShow MoreRelatedRacism : Nelson Mandela, Former President Of South Africa1523 Words   |  7 Pageslove comes more naturally to the human heart than its opposite† (Nelson Mandela Museum). Racism has been at the forefront of debates since the Nineteenth century and has spread throughout the United States, creating outrage, violence, and political reform. Racism has been the main cause behind many major organizations in this country, some even political. Some organizations take a firm stance against racism, such as the National Association for the Advancement of Colored People (NAACP), and someRead MoreRacism : Some Call It A Disease1153 Words   |  5 PagesRacism Some call it a â€Å"disease†, some consider it a way of life, and others want it to be gone. Racism has been around for centuries as a sensitive controversial topic among Americans. Racism comes from way back when before I was born and it shocks me that it s still a popular subject in this day an age. It has been brought to the countries attention and has gotten better, but hasn’t vanished and still remains. Everyone views racism differently and have different reasons to why racism may be presentRead MoreThe Golden Rule Of The Civil Rights Movement1685 Words   |  7 Pagesavoid the major problems, like racism and the concept of white privilege. Being raised in the South I was taught many things. The two most meaningful to me were The Golden Rule, where one treats people the way one wants to be treated, and that each person is born with the right to be equal. After I spoke to Sandy, I noticed that during this time, and even now, those were imperfect. Not everyone is born equal and to be born as a white male you obtain the most probable happiness. In our world todayRead MoreRacism in Sports Essay1662 Words   |  7 PagesRacism in Sports Racism is a belief that people of different races have different qualities and abilities, and that some races are inherently superior or in inferior. Racism in the form of discrimination persists in society. Racism in sports occurs in both team and individual sports around the world. Sports itself does not induce racism. Sports are meant to be a colorblind activity that adheres to the notion of fair play. Racism in sports is a problem which manifest around the world. It ledRead MoreEssay about Racism and Cultural Differences Exposed in Othello1322 Words   |  6 Pagesshown to us a play of love and jealousy. There is however more to this play than just love and jealousy; there is underlying racism, hate, deception, pride, and even sexism between these pages. Othello is a transcendent play, one that will survive the perils of time simply because it is still relevant. Even today, over 400 years later, there are still issues of racism and sexism. Hate is as natural as love in humans and Othello gets right to the root of that. We witness this from the very firstRead MoreSay No to Racism1581 Words   |  7 PagesPersuasive Speech On â€Å"Say No To Racism† Good morning to Mr. Mariapan and my beloved audience. Today, I am bold to talk about an issue that has haunts us for so long. Countless legislation, organizations and campaigns are created to combat this issue†¦.but†¦to no avail. The problem has been all over the globe and standing here today, I am on a mission to eradicate this issue once and for all! Ladies and gentlemen, Let us hold hand in hand and â€Å"Say No To Racism† The racism button is the easiest toRead MoreEssay about Solving Racism Yesterday and Today676 Words   |  3 PagesShe couldn’t help but think, maybe the laws have changed, but the people sure haven’t. In everyday situations, racism is still very apparent. Racism in America has come a long way, however, there is still ways to go. Since our country was founded, racism has been a there. Abolishing racism can only happen years of effort from everyone. We need to start working on solving the racial issues to benefit our future. After the Civil Rights Movement, laws were made banning slavery entirely. EventuallyRead MoreWhy Is Shakespeares Othello Still Relevant in Todays Audiences?940 Words   |  4 Pagesapplicable to today’s many audiences; Betrayal is a key theme presented in Othello, and is also still relevant to today’s audiences. Racism is a significant addition presented in the play, and unfortunately still pervades contemporary society. Madness and jealousy drive the action as it thrives in the play; these destructive emotions are still alive in humanity today. The play portrays the typical scenes of love which always seem to draw in a timeless audience. The entire plot ofRead MoreRacism Is Not Gone From The World1436 Words   |  6 Pages2016, an individual might assume that racism is nonexistent. Slavery is decades gone, blacks and whites have lived among each other since it was abolished, so you would think that by now people would be living in a world w ithout any concern about people’s races. However, the sad reality is that even though it is 2016, racism continues to be part of our society - and what is more problematic is that individuals do not recognize some acts of violence as racism, and others choose not to even pay attentionRead MoreOthello, By William Shakespeare1140 Words   |  5 Pagesâ€Å"Othello† is a play written by William Shakespeare in 1603. In this play, Shakespeare features three major characters: Othello, Iago, and Desdemona. Othello, a black man, and Desdemona, a white venetian secretly eloped in the play. Iago shows racism and prejudice towards their relationship because of their skin colors. In the play, Iago says: â€Å"Even now, now, very now, an old black ram is tupping your white ewe. Arise, arise! Awake the snorting citizens with the bell, or else the devil will make a

Los Angeles Riots Essay Research Paper Though free essay sample

Los Angeles Riots Essay, Research Paper Though sparked by the Rodney King finding of fact, there were many other causes of the public violences that erupted on the streets of Los Angeles on April 29, 1992. The Los Angeles public violences in 1992 were lay waste toing. The obvious issue portrayed through the media was black versus white. If you did non populate in Los Angeles or California opportunities are you did non hear full coverage of the narrative, you heard a simple cut and dry portraiture of the events in South Central. If you heard one thing about the public violences, it was that there was a adult male named Rodney King and he was a black male beaten with inordinate force by four white Los Angeles constabularies officers on Los Angeles concrete. The media portrayed the public violences as black fury on the streets due to the non guilty finding of fact of the four Los Angeles police officers that were confronting inordinate force charges. The non guilty finding of fact may hold been the initial cause, but the public violences were non about Rodney King, they were approximately greater issues. Some of these issues were black versus white, inkinesss and Hispanics versus the constabulary, inkinesss versus Koreans, and hapless versus rich. The public violences were make to all the underlying festering fury that had been constructing up in the occupants of Los Angeles and the incredulity that constabularies even when caught on tape, could acquire off with such ferociousness. Los Angeles was merely waiting for an event like the Rodney King finding of fact to detonate. All that was needed was that one flicker to light the choler in the citizens of South Central and do the country to detonate. South Central had been covering with important implicit in racial and economic jobs in the old ages since similar public violences in Watts in # 8216 ; 65. In 1965, steps taken to rectify the racial tenseness in the metropolis were begun. In an attempt to forestall future civil agitation in the metropolis, so Gov. Pat Brown commissioned a commission led by John McCone to look into the # 8220 ; underlying causes # 8221 ; of the # 8216 ; 65 public violences. The McCone Commission found that # 8220 ; poorness, racial divisions and other societal conditions helped trip the force # 8221 ; ( Pope ) . However, after the committees study, involvement in the Watts public violences faded and equal action was non taken to turn to these issues in the affected countries. At the decision of its probe, the McCone Commission cited that # 8220 ; so serious and so explosive is the state of affairs that, unless it is unbridled, the August public violences may look by comparing to be merely a curtain-raiser for what could blow up one twenty-four hours in the hereafter # 8221 ; ( Pope ) . Although the metropolis has changed in those old ages since the Watts public violences, unluckily, much has remained the same. This confession by the McCone Commission proved to be prophetical. The Watts public violences left 34 dead and 600 edifices damaged or destroyed. The # 8216 ; 92 public violences caused 52 human deaths, and more than 1,200 edifices were damaged or destroyed. An anon. adult male from Hollywood made a similar statement in # 8216 ; 92 after the public violences. He stated, # 8220 ; the finding of fact was merely the spark-this ( the public violence ) had been set for old ages before # 8221 ; ( Smith ) . The metropolis of Los Angeles is non a incorporate metropolis. Los Angeles consists of excessively many big sub metropoliss or communities to talk with one voice. There are many sub metropoliss in LA such as the Westside, Hollywood, the Valley, Downtown, and of class, South Central. To do things more hard, many of these sub metropoliss themselves are non unified. Due to their size, all of these communities are capable to their ain jobs, and it goes without stating that the jobs of South Central are non the same as the 1s in Hollywood. This is due to drastic demographic differences of each of the communities. South Central is made up of high per centums of minority citizens. While South Central LA has a high population of inkinesss, Hispanics and Asians, it has a low per centum of Whites. South Central is a reflecting illustration of a community divided. In Maxine Waters words, ( interior metropolis ) LA is full of excessively much hopelessness and desperation. LA author and critic Mi ke Davis supported Waters # 8217 ; statement by stating the divisions stem from interior metropolis kids # 8220 ; being so susceptible to despair. # 8221 ; The metropolis is at war with its childs. # 8220 ; LA needs to set out the resources to at least restore a connexion with the childs # 8221 ; ( Smith ) . Too many kids grow up to go gang members instead than professionals. Another job that causes division in LA is that the metropolis # 8217 ; s minorities are engaged in racial warfare. Blacks and Whites, and inkinesss and Koreans have drawn the largest conflict lines. Divisions with Whites rise out of the fact that Blacks in LA do non like the image that they are given through the media. Paula Weinstein sympathized with this emotion when she described a recent # 8220 ; media fest # 8221 ; in which they made white people scared of the African American community. Reginald Denny described jobs between races in footings of the overall attitude of people in LA as # 8220 ; giv e me what I need and jostle off. # 8221 ; His hope is that # 8220 ; people merely wake up # 8221 ; and # 8220 ; halt seeing colour, and see people as people. # 8221 ; Tensions between Koreans and inkinesss had been constructing for old ages before the King finding of fact until they eventually exploded. There were infinite Acts of the Apostless of force committed between Koreans and inkinesss that ranged non merely from plundering and combustion of Korean shops but to gun conflicts and shots. Walter Park, a good known Korean store proprietor was shot # 8220 ; about executing manner # 8221 ; by a black adult male who came up to his auto at a ruddy visible radiation, broke his window, and shot him in the caput merely for being Korean ( Smith ) . In response to the thought that inkinesss burned down their ain vicinities, Paul Parker, president for the Free the LA Four Plus defence commission stated, # 8220 ; No we didn # 8217 ; t, we burned down these Koreans in this vicinity # 8221 ; ( Smith ) . About 98 per centum of the shops burned down were Korean. He besides added, # 8220 ; You know, we got rid of all these small Korean spirits shops over here. We put them in check. # 8221 ; This tenseness between inkinesss and Koreans comes from a twosome of grounds, the first of which was summed up by Katie Miller. She states that Korean owners in South Central do non acquire to cognize the people who come into their shops. They do non esteem the people coming into their shop giving them their money. Alternatively the proprietors treat people like, # 8220 ; give me your money and acquire out of my face # 8221 ; ( Miller ) . Another one of the other main ailments by many inkinesss of Koreans in South Central is that # 8220 ; Korean-Americans do non sponsor black concerns # 8221 ; ( Choi ) . Economic differences among citizens of Los Angeles were possibly the largest lending factor to the public violences. South Cardinal LA as a higher overall poorness rate than does its environing communities. This was evidenced by the 1990 nose count which found that # 8220 ; 30 % of the people in South Central live below the poorness line # 8221 ; ( Mydans ) . A committee similar to the 1 headed by John A. McCone was formed to analyze the causes of the # 8216 ; 92 public violences. It was called the Webster Commission. The Webster Commission named # 8220 ; the widening spread between Los Angeles # 8217 ; rich and hapless, between minority and white occupants # 8221 ; as a precursor to the force. The # 8220 ; disproportionately high degrees of unemployment, poorness and homelessness in Afro-american vicinities was by most histories giving rise to a turning degree of tenseness, defeat and choler that contributed to the tense atmosphere predating the unrest, # 8221 ; harmonizing to the study ( Pope ) . In a pole taken by the Los Angeles Times in October after the public violences, Anglos, African Americans, Latinos, and Asians listed economic problems among the metropolis # 8217 ; s # 8220 ; gravest concerns. # 8221 ; However, there were differences in responses of each cultural group. For illustration, 24 % of Anglos saw unemployment as a top issue compared to 42 % of inkinesss, 36 % of Latinos, and 26 % of Asians. When asked to depict the province of personal fundss, 57 % of Whites said that they were reasonably unafraid compared to 44 % for inkinesss, 46 % for Latinos, and 47 % for Asians. Then in a follow up inquiry, 42 % of Whites thought LA # 8217 ; s economic system to be really rickety compared to 64 % of inkinesss, 51 % of Latinos, and 36 % of Asians. The Times besides stated that occupants are far more likely to place economic additions as the best counterpoison to further rioting than they were last spring. Economic jobs seem to be drawn alon g racial lines in Los Angeles and many minorities feel neglected by the authorities. The public violences arose out of the defeat of minorities being overlooked and non decently represented. The public violences were # 8220 ; the voice of the unheard # 8221 ; in America shouting out due to the deficiency of services and authorities reactivity to the people ( Waters ) . Economic damagess by the authorities have to be made in order to mend the jobs in LA . Congresswoman Maxine Waters feels that the â€Å"young work forces ( and adult females in South Central ) have been dropped off America’s docket and demand to be dealt with.† Peter Sellars made a really valid point about south cardinal and the remainder of LA in footings of the demand of mending its jobs. He commented that, â€Å"We all live in the same house? get down a fire in the cellar and nobody’s gon na be left on the top floor? closing your door in your room ( to get away the job ) doesn’t aid, in fact you have a stronger opportunity of acquiring incinerated.† America has to admit the jobs in South Central or we will all be brought down in the terminal. He went on to do the analogy that America is excessively inexpensive to replace burned out visible radiation bulbs ( in countries such as South Central ) and replace them with brighter 1s. Another immense cause of the public violences was the rift that has become common cognition for old ages between minorities and Los Angeles constabulary. Both the McCone and Webster Commissions besides attributed the public violences in portion # 8220 ; on the hapless relationship between constabulary and citizens, peculiarly minorities. # 8221 ; Twenty-seven old ages ago the McCone Commission reported, # 8220 ; The acrimonious unfavorable judgment we have heard evidences a deep and long-standing split between a significant part of the Negro community and the constabulary department. # 8221 ; The Webster study stated that, # 8220 ; There is much deep-rooted ill will, misgiving and intuition in this relationship that calls for change. # 8221 ; This is a subject that came up invariably throughout Anna Deavere Smith # 8217 ; s book. One of the jobs is that the constabulary do non do an equal attempt in community policing. They do non seek to understand what is traveling on and ac quire along with the minorities in the vicinities they are patroling. They stand back and allow things go on and so they deal with it. This unwillingness to step in in the force happening in LA streets is evidenced by the case in which Los Angeles Police Commission President Stanley Sheinbaum went into a pack meeting at Nickerson Gardens to speak with the immature work forces involved in these violent packs. He was doing an attempt to halt the force and larn what was truly traveling on. After he did this, his fellow officers were angry and they chastised him for desiring to speak to the pack members. When in world, what he did was good. The Los Angeles Police Department must alter its ideals that they should wait for force to happen between minorities instead than doing attempts to halt it. It must besides acquire back to the thought that minorities are portion of the community and they must be # 8220 ; Protected and served as well. # 8221 ; Many of those interviewed in Twilight b y Anna Deavere Smith complained of jobs with the constabulary. However, it was merely minorities who complained of unfairness and ferociousness on the portion of the constabulary. Rudy Salas complained of being taken into a room with four constabulary officers and being kicked in the caput and his tympanum being fractured because he is Mexican back in the mid-fortiess. Then his boy, who goes to Stanford, came place late for the weekend and had a gun put to his caput by a police officer. The same jobs with the constabularies have been traveling on for decennaries and people do non see any betterment or alteration. Salas stated that one cause of the rift between the constabulary and minorities is that # 8220 ; Whites are physically afraid of minorities and people of colour such as inkinesss and Mexicans. # 8221 ; Mike Zinzun, leader of the Coalition Against Police Abuse told Smith his ain narrative of constabulary ferociousness in which he was repeatedly maced, trampled and beaten b y a group of officers after being individual out of a crowd of people seeking to assist another adult male being beaten by constabulary. As a effect his ocular nervus exploded and he lost sight in one oculus and had to acquire 40 stitches on his caput. Zinzun sued the metropolis and received 1.2 million dollars and got two constabularies work forces fired. Theresa Allison, laminitis of Mothers Reclaiming our Children told her horror narratives of holding one of her boies shooting to decease by the constabulary and the other arrested unjustly. She besides told narratives of constabulary picking up young persons from her vicinity and dropping them off in other undertakings to acquire changeable. Josie Morales who is a clerk typist told Smith her narrative of 10 or 12 officers environing one adult male, George Holliday, and crushing him outside of her flat one dark. Harland Braun, advocate for Officer Theodore Briseno told a narrative about a tally in with the constabulary that his boy ( who goes to Princeton ) had while a black friend of his in was driving his Mercedes in Westwood. His boy confronted the bull by stating they had been pulled over because his friend Bobby was black and driving a Mercedes. The bull rapidly told his to close up or he # 8217 ; d # 8220 ; put a prison guard through his chest. # 8221 ; He wondered what might hold happened if they had been pulled over in a public country instead than a dark vicinity or both of their safety might hold been in serious danger. It is this fact that a big per centum of LA citizens ( largely minorities ) , has their ain narratives of constabulary ferociousness and unfairness in the system that caused such tumult after the Rodney King finding of fact. Peoples identified with Rodney King # 8217 ; s battle as a minority against the LA constabularies force. It was this job over the old ages that had been maturating in minorities and lower income countries that stood behind the # 8220 ; No Justice, No Peace # 8221 ; call of LA people and rioters. President of the Brotherhood Crusade, Danny Bakewell says, # 8220 ; the African American community has a paranoia when it comes to justice # 8221 ; ( Lacey ) . Smokey, a former pack member reinforced that statement by stating that # 8220 ; You can # 8217 ; t swear the justness system a spot. There ain # 8217 ; t a brother in the vicinity that thinks he # 8217 ; s gon na acquire a just test # 8221 ; ( Lacey ) . This is an ideal that must be changed if we are to travel on and maneuver clear of a similar job in the hereafter. Maxine Waters, congressman in South Central proposed her thought to battle police ferociousness on citizens to the President. She suggested that the Justice Department should make something about inordinate force used by constabulary sections in metropoliss such as LA and should step in when # 8220 ; constabulary sections are out of control. # 8221 ; Otis Chandler, a LA citizen echoed Water # 8217 ; s comment by st ating, # 8220 ; We need to acquire a grip on this state of affairs. It may take five old ages or ten old ages, but this is traveling to be a safe, pleasant metropolis for everybody regardless of where they live or what they do or what the colour of their tegument is. Somehow we have to do that dream come true. # 8221 ; The Los Angeles public violences in # 8217 ; 92 were non merely about Rodney King, they were approximately more important implicit in issues of economic sciences and race that had been bing and turning of all time since the Watts public violences in # 8216 ; 65. Possibly if these issues had been addressed adequately and repaired so, the devastation and force that occurred on the streets of South Central Los Angeles in 1992 would non hold to hold been endured. We can non do the same error by overlooking the racial and economic jobs confronting Los Angeles citizens. Now in the 90 # 8217 ; s, we must do certain that we take attention of the racial divisions, inequality of constabulary intervention, and poorness in South Central so that future coevalss of Los Angeles citizens do non hold to endure the same destiny. # 8220 ; Those who can non retrieve the yesteryear are condemned to reiterate it. # 8221 ; -George Santayana Lacey, Marc Blacks non surprised by leak in King instance ; Judiciary: Community leaders have been leery of the system # 8217 ; s intervention of African-Americans. Still, they are incensed that a scheme memo on the test ended up in a defence lawyer # 8217 ; s custodies. The Times Mirror Company, Los Angeles Times November 22, 1992 Sunday, Home Edition Metro ; Part B Page 1 ; Column 5 Lexis-Nexis Academic Universe hypertext transfer protocol: //web.lexis-nexis.com/universe/ 12/8/99 Mydans, Seth The Riot # 8217 ; s Ashes/A particular study. ; Separateness Grows in a Scarred Los Angeles The New York Times Company The York Times November 15, 1992, Sunday, Late Edition-Final, Section 1 ; Page 1 ; Column 2 ; National Desk 1990 US Census Data, hypertext transfer protocol: //venus.census.gov/cdrom/lookup/944873050 Pope, Lisa Riot study finds Watts similarities The Houston Chronicle Publishing Company The Houston Chronicle October 23, 1992, Friday, 2 STAR Edition Section A pg. 20 Smith, Anna Deavere Twilight Anchor Books Doubleday ; New York, New York Understanding the riots-Six months subsequently ; Money and Power/ doing it in the interior metropolis ; The Times Poll: The Economy and our lives The Times Mirror Company, Los Angeles Times November 18, 1992, Wednesday, Home Edition, Special Section ; Part JJ ; Page 7 ; Column 3

Sexual Harassment free essay sample

What exactly Is sexual harassment? Many People can not actually define the term properly. Many misconceptions of harassment have been conceived. The term sexual harassment can be defined as a speech and or/conduct of a sexually dilatoriness can nature, which was neither welcomed nor encouraged. Moreover, three authors have written about the definition of sexual harassment in the text book current issues and enduring questions. (P. 741-747). Their statements, describe sexual harassment as unwanted and unwelcome behaviors.The writer use different quenches to explain the definitions of sexual harassment. The first author, Ellen Goodman, describes her essays different technique to define sexual harassment, however, the evidence of which supports the topic is not sufficient. She is not addressing somebody case directly and is more concerned about society even though she does not cite specific information. For example In the essay the reasonable woman standard Sexual harassment Is a concept as new as date rape sexual harassment rules are based on the point of view of the victim, nearly always a women. We will write a custom essay sample on Sexual Harassment or any similar topic specifically for you Do Not WasteYour Time HIRE WRITER Only 13.90 / page (Paragraph seven and eight).Goodman describe about sexual harassment as an Interest of reasonable strategy. She Is not strongly concerned about law, nor does she choose a legal position. She is more interested in the social aspects and effects. The author has not given enough evidence to support topic and does not give much more detail. On the other hand, she strives to explain how sexual harassment is serious case. Ellen Franklin has some points to disagree with the Reasonable Woman Standard. (Ellen Goodman). For example, in her opinion, Sexual harassment ales are based on the point of view of he victim 0 They are not agreeing with this point.Goodman is not looking at the issue of reasonable approach. Franklin also strives to show sexual harassment behavior as unwanted and unwelcome, Sexual harassment Is a notorious ill define and almost Infinitely expandable concept including everything from rape to unwelcome neck massaging, discomfiture upon witnessing sexual overtures directed at others, (p. 745, paragraph 4). Ellen FranklinsBared buttock and Federal Cases essay has enough evidence. Most of his pinion has legal aspect and points out here to support the topic.Sexual harassment is an inevitable corollary to class exploitation: as Capitalist exploit workers, so do males in positions of authority exploit their female subordinates. (Paragraph one). This paragraph show what kind of action should be considered the law and what action is needed to be made in law, therefore, this essay gives more detail to describe the definition sexual harassment. In order to discuss the topic of sexual harassment in different essay, one must have a clear definition to what actually the word and the away explain correctly. Franklin Essay stronger than Goodman s exerts. The definition of sexual harassment then Is to be persistently annoy someone through the use of sexual tactics. To discuss the topic of sexual harassment In the work place, one must have a clear definition of what actually constitutes sexual harassment. However, describes sexual harassment as, This is cultural fascism unmatched since the Chinese communist outlawed hand-holding, decorative clothing and premarital sex. Her essays Cultural Fascism has similarities with Franklin and Goodman with aspect to unwanted behavior, McCarthy has her own business and is faced with possibility of sexual harassment among her employees.She believes people should be should not be constructed by law. As we were revolted and out raged by the woman-hatred in violent pornography, we reminded each other that education, not laws, was the solution to our problems. (paragraph two) In her business areas, she afraid to hire women because somebody can offend women. . This could cost big money in punitive damages and legal expenses. So her opinion is totally different from the two authors, even though she believes sexual reassessment is unwelcome behavior. The State Art Defines sexual harassment as sexual harassment is an ethical dilemma in the workplace that is on rise. Ethical codes are standard of conduct of rules of behavior adopted by various institutions, organization or professions Their self esteem and self worth have been lowered, they have been mentally abused and offended, and they have been humiliation at work. (1998, p. 23). Harm caused by sexual harassment is often extreme, including humiliation, loss of dignity, psychological (and sometimes physical) injury, and image to professional reputation and career.False sexual harassment allegations are more and more common because most people do not interpret definition in the same way. For example, while one person may view a co-workers complaint as sexual harassment, another may view it as a flattering gesture. The editors of Sexual harassment write, The differing perceptions among men and women of what constitute sexual harassment can put employers in a difficult position. Sexual abuse plagues people of all shapes, sizes, ethnicities and backgrounds.Therefore, as the function is broken down and elaborated, it could have been related to the case to show that there was sexual harassment involved. Speech and/or conduct, means that sexual harassment can be mere words, words in conjunction with conduct, or conduct alone. Laws against sexual harassment make good sense ands should be vigorously enforced. In the conclusion, talk about the fact one is a politician another a lawyer and another still business owner, discuss this could Jade their view. To interpret of sexual harassment in the three topics are heterogeneous and based sociology, political and business.

“Gown Rental Management and Information System” Essays

â€Å"Gown Rental Management and Information System† Essays â€Å"Gown Rental Management and Information System† Essay â€Å"Gown Rental Management and Information System† Essay Republic of the Philippines Gordon College Olongapo City College of Computer Studies A System Analysis and Design Project â€Å"GOWN RENTAL MANAGEMENT AND INFORMATION SYSTEM† Presented to the Faculty of Gordon College Olongapo City In Partial FulfilmentoftheRequirements for the Degree ASSOCIATE IN COMPUTER TECHNOLOGY By: JUNNIEFER C. SABILE MARK JOSEPH L. PEREZ March 14, 2013 Republic of the Philippines Gordon College Olongapo City College of Computer Studies APPROVAL SHEET A System Analysis and Design Project entitledâ€Å"GOWN RENTAL MANAGEMENT AND INFORMATION SYSTEM†prepared and submitted by JUNNIEFER C. SABILE and MARK JOSEPH L. PEREZin partial fulfilment of the requirements for the degreeASSOCIATE IN COMPUTER TECHNOLOGY is herebyaccepted and recommended forORAL EXAMINATION. ______________________________________________ MS. SHERMEIN R. FERNANDEZ SUNGA Adviser Approved by the Panel of Examiners ______________________________ ERLINDA S. CASELA Chair ____________________________ ____________________________ MRS. LILIA PERTACORTAMS. SHERMEIN R. FERNANDEZ SUNGA - Beneficiary I. T. Professional - Accepted and Approved in Partial Fulfilment of the Requirements for the Degree/Course Associate of Computer Technology. __________________________ ERLINDA S. CASELA College Dean March 2013 ACKNOWLEDGEMENT The proponents have taken efforts in this project. However, it would not have been possible without the support and help of many individuals who are in one way or another contributed and extended their valuable assistance in the preparation and completion of the project. First and foremost, the proponents would like to thank Mrs. Lilia Pertacorta, owner of Queen’s Gown and Men’s Wear who agrees to be the beneficiary of these projects, and on giving the data needed for the project and information. Ms. Shermein R. Fernandez Sunga, CCS instructor in Gordon College and the adviser on this project for giving them advices, instructions and all the things needed for finishing this project. The proponents would also like to thank her for the time and patience when they present her the system they made. Ms. Erlinda Casela-Abarintos, Dean of the College of Computer Studies for being one of the panellists on the final defense for this project. The proponents would also like to thank their parents for supporting them, telling them to never give up and to think positive. Last but not the least; the proponents would like to thank God Almighty and his son Jesus Christ for answering their prayers and giving them strength to continue on despite them wanting to give up on making this project. ABSTRACT Queen’s Gown and Men’s Wear Order and Customer Record System is a system that records customer transactions, customer information and prints an acknowledgement receipt, customer transaction report, and daily, weekly, monthly, and annual customer report, the system was made using Visual Basic and Microsoft Access 2007. The reason why this system was made is to help the beneficiary record customer transactions easily, because currently, they record customer transactions using only pen and paper. This system aims to make recording customer transactions and printing customer reports easier and faster, and has a user friendly interface. This system helped the beneficiary work easier and faster, they can now many records for a short time, they now have a printed acknowledgment receipt, customer transaction report and sales report. The beneficiary and the panellists were satisfied at the system the proponents have made. LIST OF FIGURES Figure 1: Beneficiary Map Figure 2: Queen’s Gown Organizational Chart.. Figure 3: DFD of Manual System Figure 4: Flowchart of Manual System.. .. Figure 5: DFD of Proposed System Figure 6: SDLC.. Figure 7: System Design Specification Figure 8: Gantt Chart. LIST OF TABLES Table 1: Requirement Specification.. Table 2: Division of Labor and Tasks.. Chapter I INTRODUCTION BACKGROUND OF THE PROJECT COMPANY PROFILE Queen’s Gown and Men’s Wear is owned by Mrs. Lilia Pertacorta. It is located at #33 18th Street East BajacBajac, Olongapo City Zambales. Queen’s Gown was established in year 1996, and it has a total of 5 to 10 employees and serving 50-75 customers per day. They also rent clothes and their gowns are worth 500 pesos and up depending on the type and fabric used. LOCALE OF THE STUDY Queen’s Gown and Men’s Wear is located at #33 18th St. East BajacBajac, Olongapo City Queen’s Gown Gown A. ORGANIZATIONAL STRUCTURE Mrs. Lilia Pertacorta Owner Ma. Teresa Lagisma Information Officer Figure 2: Queen’s Gown Organizational Chart B. IT FACILITIES AND EQUIPMENT OF THE BUSINESS Equipment| Quantity| Television| 1| Electric Fan| 3| Sewing Machine| 3| Flat Iron| 1| GENERAL OBJECTIVE To make a user friendly system that can record customer’s information and orders. The researchers had an analysis and general objectives to improve and propose a computerized information system and produce a system that would ease the flow of Queen’s Gown Rental. SPECIFIC OBJECTIVES 1. To save customer information. 2. To add, update, and delete customer transaction records. 3. Generate customer transaction report. 4. Add, edit, search, move and cancel orders 5. Add, edit, search, move and cancel rents 6. Uses login to access the system . View all the necessary information about the rents and orders SCOPE AND LIMITATION The project will be focus on the ordering process of Queen’s Gown, the customer information they put on every order and generating a report of all the transaction made by the customer. The System is composed of buttons which you can add; edit, delete, search, and a main form which includes add reco rd, info entry, and view report. We also have a Log-in form. This button and form can only be used by the owner. The proposed system includes the processing of costumers information. The limitation of this project is that there are no other functions and features in the system, this project will only focus on the ordering process of Queen’s Gown. The limitation of this project work is that it only prints a receipt but not to compute sales because it doesn’t tackle the payment of the Company and it only focus on the ordering and rental process of gowns and men’s wear . The other items of the company like a masquerade, crowns and etc. , are not supported by this system. CHAPTER II CONCEPTUAL FRAMEWORK REVIEW OF RELATED LITERATURE OF STUDIES Project System requires a good understanding of the topic being investigated. For this reason, a conceptual framework needs to be drawn up to guide the direction of the development of the projects. Review of related literature is a study whereby new information can be generated. In carrying out research, one of the fundamental requirements is to be able to define clearly the direction of the study. If the issues are not clear in the researchers mind, it is easy to wander away from what needs to be investigated. The conceptual framework works like a map that sets the direction of research or thesis writing. One of the significant steps in a research project is conducting the literature review. Through this chapter, the readers can familiarize with the study of the proponents. The related and previous studies presented in this chapter would give the readers and future researchers, an idea of the proposed system of the proponents. The proponents selected and reviewed these studies and previous works to provide information for the readers. THEORETICAL FRAMEWORK Queen’s Gown and Men’s Wear, they will input his information, if it is a new costumer they will input all needed information and saves it to the customer database, if it is an old customer, they will just find his name on the database and all of the information will appear. After saving the transaction, it will be saved on the transaction database. A customer transaction report that records all transactions for a certain costumer, an acknowledgement receipt which will be given to the customer and sales report. OPERATIONAL DEFINITION OF TERMS * Acknowledgement Receipt A documented  verification  that  goods  have been received or  services  have been rendered. Typically, the  acknowledgement  is indicated by the  recipients  signature  on a  bill of lading, an  invoice  or another  form. Information -Data that has been verified to be accurate and timely, is specific and organized for a purpose. * Transactions- An agreement between a buyer and a seller to exchange an asset for payment. * Sales Report A report made in a certain time showing the number of items sold or the amount of money a company has received for selling stock CHAPTER III SYSTEM ANALYSIS SYSTEM OVERVIEW Flowchart and DFD of the existing system DFD OF MANUAL SYSTEM Figure 3: DFD of Manual System START INQUIRE ITEMS ORDER OR RENT ORDER RENT ITEMS ITEMS MANUALLY RECORDS TRANSACTION MANUALLY RECORDS TRANSACTION END ATART ATART Figure 4: Flowchart of Manual System STATEMENT OF THE PROBLEM The following are the problems encountered from the current system of Queen’s Gown and Men’s Wear which is in the manual process: * subject to records lost * waste of time by scanning rental record book * employees record customer transactions using pen and paper only, * their acknowledgement receipt is handwritten * manually encode their customer reports PROPOSED SOLUTION Those problems stated can be solved in this system. This system records customer transactions easily and quickly. You can save the customer’s needed information so if the same customer orders again, no need to type his information, just search his/her name on the customer’s list and his information will automatically appear. This system can generate customer reports and acknowledgement receipt by just a click of a button. For the ownerwhose involved in the capture, processing and the inputting of data in thesystem, an information data only as good as the data inputted, poor data will lead to poor results being outputted, incomplete or in accurate information means outputted information will being complete or inaccurate. CHAPTER IV SYSTEM DESIGN OVERVIEW OF THE PROPOSED PROJECT DFD of the Proposed System CUSTOMER PERSONAL INFORMATION ITEMS O GOWN RENTAL MANAGEMENT AND INFORMATION SYSTEM Order, Rent REPORTS OWNER Figure 5: DFD of the Proposed System DATA DICTIONARY * Name The full name of the Customer * Address The full address of the customer * Rent – clothes or gown that the customer will order * Price The price of clothes or gown before the rent * Cash The amount of cash that the customer paid * Change The amount of change that customer will received * Transaction Date The date of clothes or gown ordered Order– clothes or gown that the customer will order METHODOLOGY OF THE STUDY Figure 6: The Systems Development Life Cycle Developing a system is difficult to do because there will be series of tests and revisions before it will become functional. Therefore, there are some useful tools in building in integrated system methods such as System Development Cycle models which includes Waterfall, Spiral and Rapid prototyping. REQUIREMENTSSPECIFICATION These are the minimum requirements needed for the system in order to function. HARDWARE REQUIREMENTS * Monitor * Mouse * Computer Keyboard Printer – Black and White or any printer * CD – ROM Drive * Hard Disk at least not lower than 100GB SOFTWARE REQUIREMENTS * Microsoft Visual Studio 2008 * Microsoft Power Point 2007 * Microsoft Access 2007 * Microsoft Word 2007 * Windows 7 Table 1: Hardware and Software requirements SYSTEM DESIGN SPECIFICATION Ordered Items Customer details Order New Information Rented Items Customer details Rent Rent Information Log-in Main Form Report Print Reports Returned Items Customer details Log-out Figure 7: System Design Specification GANTT CHART LEGEND: Duration SCHEDULE| NOVEMBER| DECEMBER| JANUARY| FEBRUARY| MARCH| WEEK| 2| 3| 4| 1| 2| 3| 4| 1| 2| 3| 4| 1| 2| 3| 4| 1| 2| 3| 4| Orientation about the System| | | | | | | | | | | | | | | | | | | | System Proposal Making| | | | | | | | | | | | | | | | | | | | Search for the Beneficiary| | | | | | | | | | | | | | | | | | | | Meeting with the Beneficiary| | | | | | | | | | | | | | | | | | | | Data Gathering| | | | | | | | | | | | | | | | | | | | System Design| | | | | | | | | | | | | | | | | | | | Codings| | | | | | | | | | | | | | | | | | | | Preliminary Defense| | | | | | | | | | | | | | | | | | | | Revision of the System| | | | | | | | | | | | | | | | | | | | Testing| | | | | | | | | | | | | | | | | | | | Secondary Defense| | | | | | | | | | | | | | | | | | | | Input Data | | | | | | | | | | | | | | | | | | | | Preparation for Final Defense| | | | | | | | | | | | | | | | | | | | Final Defense| | | | | | | | | | | | | | | | | | | | Documentation| | | | | | | | | | | | | | | | | | | | Submission of the Requirement| | | | | | | | | | | | | | | | | | | | Passing of the Requirement| | | | | | | | | | | | | | | | | | | | LEGEND: Completed SCHEDULE| NOVEMBER| DECEMBER| JANUARY| FEBRUARY| MARCH| WEEK| 2| 3| 4| 1| 2| 3| 4| 1| 2| 3| 4| 1| 2| 3| 4| 1| 2| 3| 4| Orientation about the System| | | | | | | | | | | | | | | | | | | | System Proposal Making| | | | | | | | | | | | | | | | | | | | Search for the Beneficiary| | | | | | | | | | | | | | | | | | | | Meeting with the Beneficiary| | | | | | | | | | | | | | | | | | | | Data Gathering| | | | | | | | | | | | | | | | | | | | System Design| | | | | | | | | | | | | | | | | | | | Codings| | | | | | | | | | | | | | | | | | | | Preliminary Defense| | | | | | | | | | | | | | | | | | | | Revision of the System| | | | | | | | | | | | | | | | | | | | Testing| | | | | | | | | | | | | | | | | | | | Secondary Defense| | | | | | | | | | | | | | | | | | | | Input Data | | | | | | | | | | | | | | | | | | | | Preparation for Final Defense| | | | | | | | | | | | | | | | | | | | Final Defense| | | | | | | | | | | | | | | | | | | | Documentation| | | | | | | | | | | | | | | | | | | | Submission of the Requirement| | | | | | | | | | | | | | | | | | | | Passing of the Requirement| | | | | | | | | | | | | | | | | | | | Figure 8: Gantt Chart DIVISION OF LABOR Table 2: Division of Labor and Tasks JUNNIEFER C. SABILE| MARK JOSEPH L. PEREZ| -Coding -Debugging-Gathering information for the system-Design Project System -Making Documentation-User’s Interface| -Paper Works-Making Letters-Making Presentations-Making Documentation| Chapter V SUMMARY OF FINDINGS, CONCLUSIONS AND RECOMMENDATIONS SUMMARY OF FINDINGS When we are concerning the manual process of maintaining a rental records regarding customer’s information, the major problem is the waste of time that is completely dependent on human actions which couldn’t be free from errors. The manual system is difficult to managed that is why we the researchers find ways to propose this new system. This project is designed so as to be used by Queen’s Gown and Men’s Wear specializing in renting gowns and men’s wear to customers. It is a system through which owner can view available items and rented gowns. The development of the new system include such as saving time, reliability, and for the records to be safe kept and to improved their current system by making it computerized for faster and more efficient way in handling transaction for their customers. And all the stages of the transaction procedure will be facilitated by the system. It will provide a user friendly interface, access levels to ensure the integrity of the data stored in the system. CONCLUSIONS This Gown Rental Management and Information Systemfor Queen’s Gown and Men’s Wearis so important in dealing with the owner’s daily need of keeping rental records and customer transactions. Especially during occasional times wherein there are lots of customers who wanted to rent gowns, this would help much. Typing is much better than of writing for easy saving changes like editing wrong information, adding new items, updating available and rented items, making acknowledgement receipts, and generating sales reports for the said beneficiary. RECOMMENDATIONS Before creating a system, you must first know the purpose of the system; plan the system flow first before making the actual system, gather all the data needed for the system, and set priorities. In creating a customer record system, you must make it very user friendly. If possible, do not put many forms in the system, put multiple functions in only 1 form so the system won’t be confusing to use, like this system, most of its functions like, adding, deleting, editing, updating transactions, print receipt, print sales report and the transaction list are all on the main form. In designing the look of the system, make it simple; In the design, use colors that are pleasing to the eyes, the text and the buttons in the system should be readable and avoid too much gimmicks on the system like splash screens, unnecessary message boxes etc. This rental system is already a running system yet need more development especially the design in showing the lists of the customers who rented certain item/s. BIBLIOGRAPHY Eyjen, B. et. al. (2008). Professional Visual Basic 2008, Indianapolis, IN: Wiley Publishing Inc. Grundgeiger, Dave. (2002). Programming Visual Basic. NET. Sebastopol, CA: O’Reilly National Barcode. (2007,November). What is POS?. Retrieved December 2, 2011, from nationalbarcode. com/info/what-is-point-of-sale. html WhatIS(2011,March). POS Terminal. Retrieved November 3, 2011, from http://whatis. techtarget. com/definition/0,,sid9_gci774854,00. html https://docs. google. com/document/preview? hgd=1id=13i-I5cFekkqspu9mA4yf-ru_GFB-g_n9rVct_n0ZXdgpli=1 https://docs. google. com/document/preview? gd=1id=13i-I5cFekkqspu9mA4yf-ru_GFB-g_n9rVct_n0ZXdgpli=1 http://softwaretopic. informer. com/gown-rental-system/ rentinfo. com/ APPENDICES A. PROGRAM SOURCE CODE: PublicClass Form1 PrivateSub Form1_Load(ByVal sender A s System. Object, ByVal e As System. EventArgs) HandlesMyBase. Load EndSub PrivateSub but_login_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles but_login. Click If txtuser. Text. Trim = Or txtpword. Text. Trim = Then MsgBox(Please fill in the required fields! , MsgBoxStyle. Exclamation, System Login) txtuser. Focus() Else con. Open() sql = SELECT * FROM [account] WHERE [user] LIKE txtuser. Text AND [password] LIKE txtpword. Text dc = New Data. OleDb. OleDbCommand(sql, con) dr = dc. ExecuteReader If dr. HasRows Then While dr. Read txtuser. Text = dr. Item(user) EndWhile MsgBox(Succesfully Log-in! , MsgBoxStyle. Information, System Login) con. Close() Me. Hide() Mainpage. Show() Else con. Close() MsgBox(Incorrect Username or Password! , MsgBoxStyle. Exclamation, System Login) txtuser. Clear() txtpword. Clear() txtuser. Focus() EndIf EndIf EndSub PrivateSub but_clearlogin_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles but_clearlogin. Click Dim quitmsg AsString = Are You Sure You Want To Quit? Dim quitanswer As DialogResult = MessageBox. Show(quitmsg, QUIT , MessageBoxButtons. YesNo, MessageBoxIcon. Question, MessageBoxDefaultButton. Button2) If quitanswer = Windows. Forms. DialogResult. Yes Then Me. Close() EndIf EndSub EndClass PublicClass Mainpage PrivateSub Button1_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button1. Click Me. Hide() Order. Show() EndSub PrivateSub Button4_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button4. Click Form1. Show() Me. Close() EndSub PrivateSub Button2_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button2. Click Me. Hide() Rental. Show() EndSub PrivateSub Button6_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button6. Click Me. Hide() Ordered_Items. Show() EndSub PrivateSub Button3_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button3. Click Me. Hide() RentedItems. Show() EndSub PrivateSub Button7_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button7. Click Me. Hide() ReturnedItems. Show() EndSub PrivateSub Button5_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button5. Click reportlist. Show() EndSub PrivateSub Mainpage_Load(ByVal sender As System. Object, ByVal e As System. EventArgs) HandlesMyBase. Load EndSub EndClass Imports System. Data. OleDb PublicClass EditOrder Public EditString AsString Public ReturnForm AsString PrivateSub EditOrder_Load(ByVal sender As System. Object, ByVal e As System. EventArgs) HandlesMyBase. Load sql = SELECT * FROM [Order] WHERE [Order Number]=' EditString con. Open() dc = New OleDb. OleDbCommand(sql, con) dr = dc. ExecuteReader While dr. Read Label1. Text = dr. Item(Order Number) Last_NameTextBox. Text = dr. Item(Last Name) First_NameTextBox. Text = dr. Item(First Name) Customer_NumberTextBox. Text = dr. Item(Customer Number) Date_OrderedDateTimePicker. Value = dr. Item(Date Ordered) Date_of_Pick_UpDateTimePicker. Value = dr. Item(Date of Pickup) Name_of_UserTextBox. Text = dr. Item(Name of User) GenderComboBox. Text = dr. Item(Gender) DistanceTextBox. Text = dr. Item(Distance) ShoulderTextBox. Text = dr. Item(Shoulder) Arm_HoleTextBox. Text = dr. Item(Arm Hole) Sleeve_LengthTextBox. Text = dr. Item(Sleeve Length) WaistlineTextBox. Text = dr. Item(Waistline) Upper_BustTextBox. Text = dr. Item(Upper Bust) BustTextBox. Text = dr. Item(Bust) HipsTextBox. Text = dr. Item(Hips) FigureTextBox. Text = dr. Item(Figure) Other_DescriptionTextBox. Text = dr. Item(Other Description) EndWhile dr. Close() con. Close() Last_NameTextBox. Focus() EndSub PrivateSub Button1_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button1. Click If Last_NameTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf First_NameTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Customer_NumberTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Name_of_UserTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf GenderComboBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf DistanceTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf ShoulderTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Arm_HoleTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Sleeve_LengthTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf WaistlineTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Upper_BustTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf BustTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf HipsTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf FigureTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Other_DescriptionTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) Else edit() EndIf EndSub PrivateSub edit() Dim msg AsString = MessageBox. Show(Are you sure you want to replace existing record? , Update Query, MessageBoxButtons. YesNo, MessageBoxIcon. Question) If msg = MsgBoxResult. Yes Then con. Open() sql = UPDATE [Order] SET [Last Name]=' Last_NameTextBox. Text , [First Name]=' _ First_NameTextBox. Text , [Customer Number]=' Customer_NumberTextBox. Text , [Date Ordered]=' _ Date_OrderedDateTimePicker. Value. ToShortDateString , [Date of Pickup]=' Date_of_Pick_UpDateTimePicker. Value. ToShortDateString , [Name of User]=' _ Name_of_UserTextBox. Text , [Gender]=' GenderComboBox. Text , [Distance]=' _ DistanceTextBox. Text , [Shoulder]=' ShoulderTextBox. Text , [Arm Hole]=' _ Arm_HoleTextBox. Text , [Sleeve Length]=' Sleeve_LengthTextBox. Text , [Waistline]=' _ WaistlineTextBox. Text , [Upper Bust]=' Upper_BustTextBox. Text , [Bust]=' _ BustTextBox. Text , [Hips]=' HipsTextBox. Text , [Figure]=' _ FigureTextBox. Text WHERE [Order Number]=' Label1. Text dc = New OleDb. OleDbCommand(sql, con) dc. ExecuteNonQuery() con. Close() MsgBox(Record Updated! , MsgBoxStyle. Information, Update Query) Me. Close() Ordered_Items. Show() Else ExitSub EndIf EndSub PrivateSub Button3_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button3. Click Dim msg AsString = MessageBox. Show(Are you sure you want to Move the Item? , Update Query, MessageBoxButtons. YesNo, MessageBoxIcon. Question) If msg = MsgBoxResult. Yes Then con. Open() sql = SELECT * FROM [Order] ORDER BY [Order Number] ASC dc = New OleDbCommand(sql, con) dr = dc. ExecuteReader ql = INSERT INTO [Done] ([Order Number],[Last Name],[First Name],[Customer Number],[Date of Order],[Date of Pick-Up],[Name of User],[Gender],[Distance],[Shoulder],[Arm Hole],[Sleeve Length],[Waist Line],[Upper Bust],[Bust],[Hips],[Figure],[Other Description]) VALUES ( Label1. Text , _ Last_NameTextBox. Text , First_NameTextBox. Text , Custome r_NumberTextBox. Text , Date_OrderedDateTimePicker. Value. ToShortDateString , Date_of_Pick_UpDateTimePicker. Value. ToShortDateString , Name_of_UserTextBox. Text , GenderComboBox. Text , DistanceTextBox. Text , ShoulderTextBox. Text , Arm_HoleTextBox. Text , Sleeve_LengthTextBox. Text , WaistlineTextBox. Text , Upper_BustTextBox. Text , BustTextBox. Text , HipsTextBox. Text , FigureTextBox. Text , Other_DescriptionTextBox. Text ) dc = New OleDbCommand(sql, con) dc. ExecuteNonQuery() sql = DELETE * FROM [Order] WHERE [Order Number]=' Label1. Text dc = New OleDb. OleDbCommand(sql, con) dc. ExecuteNonQuery() con. Close() MsgBox(Item Moved! , MsgBoxStyle. Information, Insert Query) CLR() Me. Close() Ordered_Items. Show() EndIf EndSub PrivateSub Button2_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button2. Click Me. Close() Ordered_Items. Show() EndSub EndClass Imports System. Data. OleDb PublicClass EditRent Public EditString AsString Public ReturnForm AsString PrivateSub EditRent_Load(ByVal sender As System. Object, ByVal e As System. EventArgs) HandlesMyBase. Load sql = SELECT * FROM [Rent] WHERE [Rent Number]='; EditString ; con. Open() dc = New OleDb. OleDbCommand(sql, con) dr = dc. ExecuteReader While dr. Read Label2. Text = dr. Item(Rent Number) Last_NameTextBox. Text = dr. Item(Last Name) First_NameTextBox. Text = dr. Item(First Name) Customer_NumberTextBox. Text = dr. Item(Customer Number) AddressTextBox. Text = dr. Item(Address) DateTimePicker1. Value = dr. Item(Date of Rent) DateTimePicker2. Value = dr. Item(Date of Return) Rented_Item_DesciptionTextBox. Text = dr. Item(Item Description) AmountTextBox. Text = dr. Item(Amount) EndWhile dr. Close() con. Close() Last_NameTextBox. Focus() EndSub PrivateSub Button2_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button2. Click Me. Hide() RentedItems. Show() EndSub PrivateSub save() con. Open() sql = SELECT * FROM [Rent] ORDER BY [Rent Number] ASC dc = New OleDbCommand(sql, con) dr = dc. ExecuteReader ql = INSERT INTO [Rent] ([Rent Number],[Last Name],[First Name],[Customer Number],[Address],[Date of Rent],[Date of Return],[Item Description],[Amount]) VALUES (; Label2. Text ;, _ ; Last_NameTextBox. Text ;, ; First_NameTextBox. Text ;, ; Customer_NumberTextBox. Text ;, ; AddressTextBox. Text ;, ; DateTimePicker1. Value. ToShortDateString ;, ; DateTimePicker2. Value. ToShort DateString ;, ; Rented_Item_DesciptionTextBox. Text ;, ; AmountTextBox. Text ;) dc = New OleDbCommand(sql, con) dc. ExecuteNonQuery() con. Close() MsgBox(Record Saved! , MsgBoxStyle. Information, Insert Query) CLR() Me. Close() RentedItems. Show() EndSub PrivateSub edit() Dim msg AsString = MessageBox. Show(Are you sure you want to replace existing record? , Update Query, MessageBoxButtons. YesNo, MessageBoxIcon. Question) If msg = MsgBoxResult. Yes Then con. Open() sql = UPDATE [Rent] SET [Last Name]=' Last_NameTextBox. Text , [First Name]=' _ First_NameTextBox. Text , [Customer Number]=' Customer_NumberTextBox. Text , [Address]=' _ AddressTextBox. Text , [Date of Rent]=' DateTimePicker1. Value. ToShortDateString , [Date of Return]=' _ DateTimePicker2. Value. ToShortDateString , [Item Description]=' Rented_Item_DesciptionTextBox. Text , [Amount]=' _ AmountTextBox. Text WHERE [Rent Number]=' Label2. Text dc = New OleDb. OleDbCommand(sql, con) dc. ExecuteNonQuery() con. Close() MsgBox(Record Updated! , MsgBoxStyle. Information, Update Query) Me. Close() RentedItems. Show() Else ExitSub EndIf EndSub PrivateSub Button1_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button1. Click If Last_NameTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf First_NameTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Customer_NumberTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf AddressTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Customer_NumberTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Rented_Item_DesciptionTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary in formation! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf AmountTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) Else edit() EndIf EndSub PrivateSub Button3_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button3. Click Dim msg AsString = MessageBox. Show(Are you sure you want to Move the Item? , Update Query, MessageBoxButtons. YesNo, MessageBoxIcon. Question) If msg = MsgBoxResult. Yes Then con. Open() sql = SELECT * FROM [Rent] ORDER BY [Rent Number] ASC dc = New OleDbCommand(sql, con) dr = dc. ExecuteReader sql = INSERT INTO [Return] ([Return Number],[Last Name],[First Name],[Customer Number],[Address],[Date of Rent],[Date of Return],[Item Description],[Amount]) VALUES ( Label2. Text , _ Last_NameTextBox. Text , First_NameTextBox. Text , Customer_NumberTextBox. Text , AddressTextBox. Text , DateTimePicker1. Value. ToShortDateString , DateTimePicker2. Value. ToShortDateString , Rented_Item_DesciptionTextBox. Text , AmountTextBox. Text ) dc = New OleDbCommand(sql, con) dc. ExecuteNonQuery() sql = DELETE * FROM [Rent] WHERE [Rent Number]=' Label2. Text dc = New OleDb. OleDbCommand(sql, con) dc. ExecuteNonQuery() con. Close() MsgBox(Item Moved! , MsgBoxStyle. Information, Insert Query) CLR() Me. Close() RentedItems. Show() EndIf EndSub EndClass Imports System. IO Imports System. Data. OleDb Module Module1 Public a AsInteger = 1 Public sql AsString Public conString AsString = Provider=Microsoft. JET. OLEDB. 4. 0;Data Source=|DataDirectory|GownNewDatabase1. mdb Public CurrentForm As System. Windows. Forms. Form Public con AsNew OleDbConnection(conString) Public ds As DataSet Public dc As OleDbCommand Public dr As OleDbDataReader Public da As OleDbDataAdapter Public dt As DataTable EndModule Imports System. Data. OleDb PublicClass Order Sub ptcode() Randomize() pt1 = Format(Int(Rnd() * 99)) pt2 = Year(Now()) 2000 pt3 = pt2 ; pt1 Label12. Text = pt3 EndSub Sub ptcode2() Randomize() p1 = Format(Int(Rnd() * 9), 0) p2 = Format(Int(Rnd() * 9), 1) p3 = p2 ; p1 Label13. Text = p3 EndSub Sub ptcode3() Dim pr4 As String pr4 = p3 + 1 Label13. Text = pr4 End Sub PrivateSub Order_Load(ByVal sender As System. Object, ByVal e As System. EventArgs) HandlesMyBase. Load Order_NumberTextBox. Hide() ptcode() ptcode2() EndSub PrivateSub Button1_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button1. Click If Last_NameTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf First_NameTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Customer_NumberTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Name_of_UserTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf GenderComboBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf DistanceTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf ShoulderTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Arm_HoleTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Sleeve_LengthTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf WaistlineTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Upper_BustTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf BustTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf HipsTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf FigureTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Other_DescriptionTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) Else saved() EndIf EndSub Pri vateSub saved() If MessageBox. Show(Are you sure the information you have entered is correct? , ADD PATIENT INFORMATION, MessageBoxButtons. YesNo, MessageBoxIcon. Question) = Windows. Forms. DialogResult. Yes Then con. Open() sql = SELECT * FROM [Order] ORDER BY [Order Number] ASC dc = New OleDbCommand(sql, con) dr = dc. ExecuteReader ql = INSERT INTO [Order] ([Order Number],[Transaction],[Last Name],[First Name],[Customer Number],[Date Ordered],[Date of Pickup],[Name of User],[Gender],[Distance],[Shoulder],[Arm Hole],[Sleeve Length],[Waistline],[Upper Bust],[Bust],[Hips],[Figure],[Other Description]) VALUES (; Label12. Text ;, _ ; Label13. Text ;, ; Last_NameTextBox. Text ;, ; First_NameTextBox. Text ;, ; Customer_NumberTextBox. Text ;, ; Date_OrderedDateTimePicker. Value. ToShortDateString ;, ; Date_of_Pick_UpDateTimePicker. Value. ToShortDateString ;, ; Name_of_UserTextBox. Text ;, ; GenderComboBox. Text ;, ; DistanceTextBox. Text ;, ; ShoulderTextBox. Text ;, ; Arm_HoleTextBox. Text ;, ; Sleeve_LengthTextBox. Text ;, ; WaistlineTextBox. Text ;, ; Upper_BustTextBox. Text ;, ; BustTextBox. Text ;, ; HipsTextBox. Text ;, ; FigureTextBox. Text ;, ; Other_DescriptionTextBox. Text ;) dc = New OleDbCommand(sql, con) dc. ExecuteNonQuery() con. Close() MsgBox(Record Saved! , MsgBoxStyle. Information, Insert Query) EndIf EndSub PrivateSub Button2_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button2. Click Me. Close() Mainpage. Show() EndSub PrivateSub Button4_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button4. Click Last_NameTextBox. Clear() First_NameTextBox. Clear() Customer_NumberTextBox. Clear() Name_of_UserTextBox. Clear() GenderComboBox. ResetText() ShoulderTextBox. Clear() DistanceTextBox. Clear() Arm_HoleTextBox. Clear() Sleeve_LengthTextBox. Clear() WaistlineTextBox. Clear() Upper_BustTextBox. Clear() BustTextBox. Clear() HipsTextBox. Clear() FigureTextBox. Clear() Other_DescriptionTextBox. Clear() Label13. Text = Val(Label13. Text) + 1 ptcode3() Label12. Text = + 1 EndSub PrivateSub Button3_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button3. Click Name_of_UserTextBox. Clear() GenderComboBox. ResetText() ShoulderTextBox. Clear() DistanceTextBox. Clear() Arm_HoleTextBox. Clear() Sleeve_LengthTextBox. Clear() WaistlineTextBox. Clear() Upper_BustTextBox. Clear() BustTextBox. Clear() HipsTextBox. Clear() FigureTextBox. Clear() Other_DescriptionTextBox. Clear() Label12. Text = Val(Label12. Text) + 1 EndSub PrivateSub NewTransactionToolStripMenuItem_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles NewTransactionToolStripMenuItem. Click Last_NameTextBox. Clear() First_NameTextBox. Clear() Customer_NumberTextBox. Clear() Name_of_UserTextBox. Clear() GenderComboBox. ResetText() ShoulderTextBox. Clear() DistanceTextBox. Clear() Arm_HoleTextBox. Clear() Sleeve_LengthTextBox. Clear() WaistlineTextBox. Clear() Upper_BustTextBox. Clear() BustTextBox. Clear() HipsTextBox. Clear() FigureTextBox. Clear() Other_DescriptionTextBox. Clear() Label13. Text = Val(Label13. Text) + 1 EndSub PrivateSub NewOrderToolStripMenuItem_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles NewOrderToolStripMenuItem. Click Name_of_UserTextBox. Clear() GenderComboBox. ResetText() ShoulderTextBox. Clear() DistanceTextBox. Clear() Arm_HoleTextBox. Clear() Sleeve_LengthTextBox. Clear() WaistlineTextBox. Clear() Upper_BustTextBox. Clear() BustTextBox. Clear() HipsTextBox. Clear() FigureTextBox. Clear() Other_DescriptionTextBox. Clear() Label12. Text = Val(Label12. Text) + 1 EndSub EndClass Imports System. IO Imports System. Data Imports System. Data. OleDb PublicClass Ordered_Items Dim SelectionString AsString = String. Empty Dim m As MsgBoxResult Dim t AsString PrivateSub Ordered_Items_Load(ByVal sender As System. Object, ByVal e As System. EventArgs) HandlesMyBase. Load con. Open() sql = SELECT * FROM [Order] dc = New OleDb. OleDbCommand(sql, con) dr = dc. ExecuteReader lv. View = View. Details lv. FullRowSelect = True lv. GridLines = True lv. Columns. Add(Order Number, 90) lv. Columns. Add(Last Name, 105) lv. Columns. Add(First Name, 105) lv. Columns. Add(Customer Number, 100) lv. Columns. Add(Date Ordered, 150) lv. Columns. Add(Date of Pickup, 120) lv. Columns. Add(Name of User, 150) lv. Columns. Add(Gender, 50) lv. Columns. Add(Distance, 50) lv. Columns. Add(Shoulder, 50) lv. Columns. Add(Arm Hole, 50) lv. Columns. Add(Sleeve Length, 50) lv. Columns. Add(Waistline, 50) lv. Columns. Add(Upper Bust, 50) lv. Columns. Add(Bust, 50) lv. Columns. Add(Hips, 50) lv. Columns. Add(Figure, 50) lv. Columns. Add(Other Description, 150) While dr. Read Dim LVItem AsNew ListViewItem(dr. Item(Order Number). ToString()) LVItem. SubItems. Add(dr. Item(Last Name)) LVItem. SubItems. Add(dr. Item(First Name)) LVItem. SubItems. Add(dr. Item(Customer Number)) LVItem. SubItems. Add(dr. Item(Date Ordered)) LVItem. SubItems. Add(dr. Item(Date of Pickup)) LVItem. SubItems. Add(dr. Item(Name of User)) LVItem. SubItems. Add(dr. Item(Gender)) LVItem. SubItems. Add(dr. Item(Distance)) LVItem. SubItems. Add(dr. Item(Shoulder)) LVItem. SubItems. Add(dr. Item(Arm Hole)) LVItem. SubItems. Add(dr. Item(Sleeve Length)) LVItem. SubItems. Add(dr. Item(Waistline)) LVItem. SubItems. Add(dr. Item(Upper Bust)) LVItem. SubItems. Add(dr. Item(Bust)) LVItem. SubItems. Add(dr. Item(Hips)) LVItem. SubItems. Add(dr. Item(Figure)) LVItem. SubItems. Add(dr. Item(Other Description)) lv. Items. Add(LVItem) EndWhile con. Open() sql = SELECT * FROM [Done] dc = New OleDb. OleDbCommand(sql, con) dr = dc. ExecuteReader lv1. View = View. Details lv1. FullRowSelect = True lv1. GridLines = True lv1. Columns. Add(Order Number, 90) lv1. Columns. Add(Last Name, 105) lv1. Columns. Add(First Name, 105) lv1. Columns. Add(Customer Number, 100) lv1. Columns. Add(Date Ordered, 150) lv1. Columns. Add(Date of Pickup, 120) lv1. Columns. Add(Name of User, 150) lv1. Columns. Add(Gender, 50) lv1. Columns. Add(Distance, 50) lv1. Columns. Add(Shoulder, 50) lv1. Columns. Add(Arm Hole, 50) lv1. Columns. Add(Sleeve Length, 50) lv1. Columns. Add(Waistline, 50) lv1. Columns. Add(Upper Bust, 50) lv1. Columns. Add(Bust, 50) lv1. Columns. Add(Hips, 50) lv1. Columns. Add(Figure, 50) lv1. Columns. Add(Other Description, 150) While dr. Read Dim LVI1tem AsNew ListViewItem(dr. Item(Order Number). ToString()) LVI1tem. SubItems. Add(dr. Item(Last Name)) LVI1tem. SubItems. Add(dr. Item(First Name)) LVI1tem. SubItems. Add(dr. Item(Customer Number)) LVI1tem. SubItems. Add(dr. Item(Date of Order)) LVI1tem. SubItems. Add(dr. Item(Date of Pick-Up)) LVI1tem. SubItems. Add(dr. Item(Name of User)) LVI1tem. SubItems. Add(dr. Item(Gender)) LVI1tem. SubItems. Add(dr. Item(Distance)) LVI1tem. SubItems. Add(dr. Item(Shoulder)) LVI1tem. SubItems. Add(dr. Item(Arm Hole)) LVI1tem. SubItems. Add(dr. Item(Sleeve Length)) LVI1tem. SubItems. Add(dr. Item(Waist Line)) LVI1tem. SubItems. Add(dr. Item(Upper Bust)) LVI1tem. SubItems. Add(dr. Item(Bust)) LVI1tem. SubItems. Add(dr. Item(Hips)) LVI1tem. SubItems. Add(dr. Item(Figure)) LVI1tem. SubItems. Add(dr. Item(Other Description)) lv1. Items. Add(LVI1tem) EndWhile con. Close() EndSub PrivateSub txtSearch_TextChanged(ByVal sender AsObject, ByVal e As System. EventArgs) Handles txtSearch. TextChanged If ComboBox1. Text = Order NumberThen sql = SELECT * FROM [Order] WHERE [Order Number] LIKE % txtSearch. Text % ORDER BY [Order Number] ASC search() ElseIf ComboBox1. Text = Last NameThen sql = SELECT * FROM [Order] WHERE [Last Name] LIKE % txtSearch. Text % ORDER BY [Last Name] ASC search() ElseIf ComboBox1. Text = Date of OrderThen sql = SELECT * FROM [Order] WHERE [Date Ordered] LIKE % txtSearch. Text % ORDER BY [Date Ordered] ASC search() EndIf EndSub PrivateSub search() v. Clear() con. Open() sql = SELECT * FROM [Order] WHERE [Order Number] LIKE % ; txtSearch. Text ; % ORDER BY [Order Number] ASC dc = New OleDb. OleDbCommand(sql, con) dr = dc. ExecuteReader lv. View = View. Details lv. FullRowSelect = True lv. GridLines = True lv. Columns. Add(Order Number, 90) lv. Columns. Add(Last Name, 105) lv. Columns. Add(First Name, 105) lv. Columns. Add(Customer Number, 100 ) lv. Columns. Add(Date Ordered, 150) lv. Columns. Add(Date of Pickup, 120) lv. Columns. Add(Name of User, 150) lv. Columns. Add(Gender, 50) lv. Columns. Add(Distance, 50) lv. Columns. Add(Shoulder, 50) lv. Columns. Add(Arm Hole, 50) lv. Columns. Add(Sleeve Length, 50) lv. Columns. Add(Waistline, 50) lv. Columns. Add(Upper Bust, 50) lv. Columns. Add(Bust, 50) lv. Columns. Add(Hips, 50) lv. Columns. Add(Figure, 50) lv. Columns. Add(Other Description, 150) While dr. Read Dim LVItem AsNew ListViewItem(dr. Item(Order Number). ToString()) LVItem. SubItems. Add(dr. Item(Last Name)) LVItem. SubItems. Add(dr. Item(First Name)) LVItem. SubItems. Add(dr. Item(Customer Number)) LVItem. SubItems. Add(dr. Item(Date Ordered)) LVItem. SubItems. Add(dr. Item(Date of Pickup)) LVItem. SubItems. Add(dr. Item(Name of User)) LVItem. SubItems. Add(dr. Item(Gender)) LVItem. SubItems. Add(dr. Item(Distance)) LVItem. SubItems. Add(dr. Item(Shoulder)) LVItem. SubItems. Add(dr. Item(Arm Hole)) LVItem. SubItems. Add(dr. Item(Sleeve Length)) LVItem. SubItems. Add(dr. Item(Waistline)) LVItem. SubItems. Add(dr. Item(Upper Bust)) LVItem. SubItems. Add(dr. Item(Bust)) LVItem. SubItems. Add(dr. Item(Hips)) LVItem. SubItems. Add(dr. Item(Figure)) LVItem. SubItems. Add(dr. Item(Other Description)) lv. Items. Add(LVItem) EndWhile con. Close() If txtSearch. Text. Trim = Then lv. Clear() lv. View = View. Details lv. FullRowSelect = True lv. GridLines = True lv. Columns. Add(Order Number, 90) lv. Columns. Add(Last Name, 105) lv. Columns. Add(First Name, 105) lv. Columns. Add(Customer Number, 100) lv. Columns. Add(Date Ordered, 150) lv. Columns. Add(Date of Pickup, 120) lv. Columns. Add(Name of User, 150) lv. Columns. Add(Gender, 50) lv. Columns. Add(Distance, 50) lv. Columns. Add(Shoulder, 50) lv. Columns. Add(Arm Hole, 50) lv. Columns. Add(Sleeve Length, 50) lv. Columns. Add(Waistline, 50) lv. Columns. Add(Upper Bust, 50) lv. Columns. Add(Bust, 50) lv. Columns. Add(Hips, 50) lv. Columns. Add(Figure, 50) lv. Columns. Add(Other Description, 150) EndIf EndSub PrivateSub search1() lv1. Clear() con. Open() sql = SELECT * FROM [Order] WHERE [Order Number] LIKE % ; txtSearch. Text ; % ORDER BY [Order Number] ASC dc = New OleDb. OleDbCommand(sql, con) dr = dc. ExecuteReader lv1. View = View. Details lv1. FullRowSelect = True lv1. GridLines = True lv1. Columns. Add(Order Number, 90) lv1. Columns. Add(Last Name, 105) lv1. Columns. Add(First Name, 105) lv1. Columns. Add(Customer Number , 100) lv1. Columns. Add(Date Ordered, 150) lv1. Columns. Add(Date of Pickup, 120) lv1. Columns. Add(Name of User, 150) lv1. Columns. Add(Gender, 50) lv1. Columns. Add(Distance, 50) lv1. Columns. Add(Shoulder, 50) lv1. Columns. Add(Arm Hole, 50) lv1. Columns. Add(Sleeve Length, 50) lv1. Columns. Add(Waistline, 50) lv1. Columns. Add(Upper Bust, 50) lv1. Columns. Add(Bust, 50) lv1. Columns. Add(Hips, 50) lv1. Columns. Add(Figure, 50) lv1. Columns. Add(Other Description, 150) While dr. Read Dim LVI1tem AsNew ListViewItem(dr. Item(Order Number). ToString()) LVI1tem. SubItems. Add(dr. Item(Last Name)) LVI1tem. SubItems. Add(dr. Item(First Name)) LVI1tem. SubItems. Add(dr. Item(Customer Number)) LVI1tem. SubItems. Add(dr. Item(Date of Order)) LVI1tem. SubItems. Add(dr. Item(Date of Pick-Up)) LVI1tem. SubItems. Add(dr. Item(Name of User)) LVI1tem. SubItems. Add(dr. Item(Gender)) LVI1tem. SubItems. Add(dr. Item(Distance)) LVI1tem. SubItems. Add(dr. Item(Shoulder)) LVI1tem. SubItems. Add(dr. Item(Arm Hole)) LVI1tem. SubItems. Add(dr. Item(Sleeve Length)) LVI1tem. SubItems. Add(dr. Item(Waist Line)) LVI1tem. SubItems. Add(dr. Item(Upper Bust)) LVI1tem. SubItems. Add(dr. Item(Bust)) LVI1tem. SubItems. Add(dr. Item(Hips)) LVI1tem. SubItems. Add(dr. Item(Figure)) LVI1tem. SubItems. Add(dr. Item(Other Description)) lv1. Items. Add(LVI1tem) EndWhile con. Close() If TextBox1. Text. Trim = Then lv1. Clear() lv1. View = View. Details lv1. FullRowSelect = True lv1. GridLines = True lv1. Columns. Add(Order Number, 90) lv1. Columns. Add(Last Name, 105) lv1. Columns. Add(First Name, 105) lv1. Columns. Add(Customer Number, 100) lv1. Columns. Add(Date Ordered, 150) lv1. Columns. Add(Date of Pickup, 120) lv1. Columns. Add(Name of User, 150) lv1. Columns. Add(Gender, 50) lv1. Columns. Add(Distance, 50) lv1. Columns. Add(Shoulder, 50) lv1. Columns. Add(Arm Hole, 50) lv1. Columns. Add(Sleeve Length, 50) lv1. Columns. Add(Waistline, 50) lv1. Columns. Add(Upper Bust, 50) lv1. Columns. Add(Bust, 50) lv1. Columns. Add(Hips, 50) lv1. Columns. Add(Figure, 50) lv1. Columns. Add(Other Description, 150) EndIf EndSub PrivateSub Button4_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button4. Click Me. Close() Mainpage. Show() EndSub PrivateSub Button2_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button2. Click Order. Show() Me. Hide() EndSub PrivateSub LVSelection() ForEach LVItem As ListViewItem In lv. SelectedItems SelectionString = LVItem. Text Next EndSub PrivateSub Button3_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button3. Click LVSelection() If SelectionString ;;Then EditOrder. EditString = SelectionString EditOrder. ReturnForm = Grid Me. Hide() EditOrder. Show() Else MsgBox(Please select record to update. , MsgBoxStyle. Exclamation, Edit Query) EndIf EndSub PrivateSub Button1_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button1. Click LVSelection() If SelectionString ;;Then Dim msg AsString = MessageBox. Show(Are you sure you want to Cancel this Transaction? , Delete Query, MessageBoxButtons. YesNo, MessageBoxIcon. Question) If msg = MsgBoxResult. Yes Then con. Open() sql = DELETE * FROM [Order] WHERE [Order Number]='; SelectionString ; dc = New OleDb. OleDbCommand(sql, con) dc. ExecuteNonQuery() con. Close() MsgBox(Rent has been Cancelled! , MsgBoxStyle. Information, Delete Query) txtSearch. Clear() txtSearch. Focus() search() Else ExitSub EndIf Else MsgBox(Please select record to be Deleted. , MsgBoxStyle. Exclamation, Delete Query) EndIf EndSub PrivateSub TextBox1_TextChanged(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles TextBox1. TextChanged If ComboBox2. Text = Order NumberThen sql = SELECT * FROM [Done] WHERE [Order Number] LIKE % txtSearch. Text % ORDER BY [Order Number] ASC search1() ElseIf ComboBox2. Text = Last NameThen sql = SELECT * FROM [Done] WHERE [Last Name] LIKE % txtSearch. Text % ORDER BY [Last Name] ASC search1() ElseIf ComboBox2. Text = Date of OrderThen sql = SELECT * FROM [Done] WHERE [Date of Order] LIKE % txtSearch. Text % ORDER BY [Date of Order] ASC search1() EndIf EndSub EndClass Imports System. Data. OleDb PublicClass Rental Sub ptcode() Dim pt1, pt2, pt3 AsString Randomize() pt1 = Format(Int(Rnd() * 999), 000) pt2 = Year(Now()) 2000 pt3 = 1 pt2 pt1 Rent_NumberTextBox. Text = pt3 EndSub PrivateSub Rental_Load(ByVal sender As System. Object, ByVal e As System. EventArgs) HandlesMyBase. Load Rent_NumberTextBox. Hide() ptcode() EndSub PrivateSub saved() If MessageBox. Show(Are you sure the information you have entered is correct? , ADD PATIENT INFORMATION, MessageBoxButtons. YesNo, MessageBoxIcon. Question) = Windows. Forms. DialogResult. Yes Then con. Open() sql = SELECT * FROM [Rent] ORDER BY [Rent Number] ASC dc = New OleDbCommand(sql, con) dr = dc. ExecuteReader sql = INSERT INTO [Rent] ([Rent Number],[Last Name],[First Name],[Customer Number],[Address],[Date of Rent],[Date of Return],[Item Description],[Amount]) VALUES ( Rent_NumberTextBox. Text , _ Last_NameTextBox. Text , First_NameTextBox. Text , Customer_NumberTextBox. Text , AddressTextBox. Text , DateTimePicker1. Value. ToShortDateString , DateTimePicker2. Value. ToShortDateString , Rented_Item_DesciptionTextBox. Text , AmountTextBox. Text ) dc = New OleDbCommand(sql, con) dc. ExecuteNonQuery() con. Close() MsgBox(Record Saved! , MsgBoxStyle. Information, Insert Query) EndIf EndSub PrivateSub Button1_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button1. Click If Last_NameTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf First_NameTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Customer_NumberTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf AddressTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Customer_NumberTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf Rented_Item_DesciptionTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary in formation! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) ElseIf AmountTextBox. Text = String. Empty Then MsgBox(All fields are required to be filled in with necessary information! Please enter valid data. , MsgBoxStyle. Information, Information Incomplete! ) Else aved() EndIf EndSub PrivateSub Button2_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button2. Click Me. Close() Mainpage. Show() EndSub EndClass Imports System. IO Imports System. Data Imports System. Data. OleDb PublicClass RentedItems Dim SelectionString AsString = String. Empty Dim m As MsgBoxResult Dim t AsString PrivateSub RentedItems_Load(ByVal sender As System. Object, ByVal e As System. EventArgs) HandlesMyBase. Load con. Open() sql = SELECT * FROM [Rent] dc = New OleDb. OleDbCommand(sql, con) dr = dc. ExecuteReader lv3. View = View. Details lv3. FullRowSelect = True lv3. GridLines = True lv3. Columns. Add(Rent Number, 90) lv3. Columns. Add(Last Name, 105) lv3. Columns. Add(First Name, 105) lv3. Columns. Add(Customer Number, 100) lv3. Columns. Add(Address, 150) lv3. Columns. Add(Date of Rent, 120) lv3. Columns. Add(Date of Return, 120) lv3. Columns. Add(Item Description, 200) lv3. Columns. Add(Amount, 50) While dr. Read Dim LVItem1 AsNew ListViewItem(dr. Item(Rent Number). ToString()) LVItem1. SubItems. Add(dr. Item(Last Name)) LVItem1. SubItems. Add(dr. Item(First Name)) LVItem1. SubItems. Add(dr. Item(Customer Number)) LVItem1. SubItems. Add(dr. Item(Address)) LVItem1. SubItems. Add(dr. Item(Date of Rent)) LVItem1. SubItems. Add(dr. Item(Date of Return)) LVItem1. SubItems. Add(dr. Item(Item Description)) LVItem1. SubItems. Add(dr. Item(Amount)) lv3. Items. Add(LVItem1) EndWhile con. Close() dr. Close() EndSub PrivateSub Button4_Click(ByVal sender As System. Object, ByVal e As System. EventArgs) Handles Button4. Click Me. Close() Mainpage. Show() EndSub PrivateSub txtSearch_KeyPress(ByVal sender AsObject, ByVal e As System. Windows. Forms. KeyPressEventArgs) Handles txtSearch. KeyPress If Asc(e. KeyChar) = 13 Then If txtSearch. Text. Trim = Then MsgBox(Please fill in the required fields! , MsgBoxStyle. Exclamation, System Login)

Free Essays on Ancient Futures

In a world of constant change and development, it is rare to come across a civilization that still operates in the same fashion as it once did in what is commonly named the â€Å"pre-technology† age. Helena Norberg-Hodge did just that as she dedicated a significant portion of her life to examining the main arteries that supported the vivacity of an amazing group of people called the Ladakhis. Unfortunately, during her stay, Norberg-Hodge witnessed the growth of the malignant tumor that is Western influence, and this would eventually be the downfall of the life structure she learned to admire from Ladakh. It can be easily determined that the appearance of and reaction due to scheduled time contributed significantly, if not completely, to the reconstruction of Ladakhi customs, beliefs, etc. Furthermore, specific text references will aptly serve as support for the notion that this decay can be pin-pointed to the aforementioned. For all intents and purposes, Norberg-Hodge intends to relay the message that this gradual shift toward more Western culture will prove the ill fate of Ladakh. Again and again, she makes clear cut arguments in her text that reveal her aggravated tone and discontent with what she is witnessing happen. At times, the reader can even gain a sense of sorrow or regret as the author can better understand what is happening, due to her past experiences with Western life. It is important to establish the condition of life in Ladakh as common knowledge, otherwise any changes go unnoticed; this is simple common sense. â€Å"Life in Ladakh is dictated by the seasons,† Norberg-Hodge explains in the opening chapter (11). â€Å"Animals play a central role in the economy†¦ they provide dung, the main fuel, as well as transport, labor, wool, and milk.† (13) Simply put, the Ladakhi nation can be compared to a â€Å"Little Tibet,† as the title of Chapter One is named. Many other factors of life, aside from the presence of ... Free Essays on Ancient Futures Free Essays on Ancient Futures In a world of constant change and development, it is rare to come across a civilization that still operates in the same fashion as it once did in what is commonly named the â€Å"pre-technology† age. Helena Norberg-Hodge did just that as she dedicated a significant portion of her life to examining the main arteries that supported the vivacity of an amazing group of people called the Ladakhis. Unfortunately, during her stay, Norberg-Hodge witnessed the growth of the malignant tumor that is Western influence, and this would eventually be the downfall of the life structure she learned to admire from Ladakh. It can be easily determined that the appearance of and reaction due to scheduled time contributed significantly, if not completely, to the reconstruction of Ladakhi customs, beliefs, etc. Furthermore, specific text references will aptly serve as support for the notion that this decay can be pin-pointed to the aforementioned. For all intents and purposes, Norberg-Hodge intends to relay the message that this gradual shift toward more Western culture will prove the ill fate of Ladakh. Again and again, she makes clear cut arguments in her text that reveal her aggravated tone and discontent with what she is witnessing happen. At times, the reader can even gain a sense of sorrow or regret as the author can better understand what is happening, due to her past experiences with Western life. It is important to establish the condition of life in Ladakh as common knowledge, otherwise any changes go unnoticed; this is simple common sense. â€Å"Life in Ladakh is dictated by the seasons,† Norberg-Hodge explains in the opening chapter (11). â€Å"Animals play a central role in the economy†¦ they provide dung, the main fuel, as well as transport, labor, wool, and milk.† (13) Simply put, the Ladakhi nation can be compared to a â€Å"Little Tibet,† as the title of Chapter One is named. Many other factors of life, aside from the presence of ...

Communication and Diversity challenges in the Workplace Research Paper

Communication and Diversity challenges in the Workplace - Research Paper Example On the other hand, workplace diversity entails the range of dissimilarities among individuals in an organization. Diversity incorporates background, race, education, gender, organizational function, ethnic group, cognitive style, age, tenure, personality, among other components. Diversity also entails how individuals perceive themselves and other people. These perceptions have an impact on the interaction of individuals. The human resource department in an organization should adequately deal with issues, for example, change and adaptability, and communication for a large number of workers to work properly in an organization. Moreover, profitable organizations realize the significance of rapid action and are willing to utilize resources so as to manage diversity in their organizations. This paper will look at communication and diversity challenges in the place of work. Effective and efficient communication is extremely essential for the success of organizations that every member of an organization should be proper communicators. A manager has a duty to ensure all workers have efficient communication skills. In addition, adequate communication in an organization plays a significant part in establishing everlasting worker motivation. Organizations that have well established communication benefit from enhanced relationships between individuals. It is essential that both management and workers have efficient communication between them because this will ensure organizational functions run smoothly. In addition, proficient communication skill will help members of an organization enhance time management in their places of work. The ability exists for a manager to supervise his own time as well as keeping the workers concentrated on deadlines. Comprehending the communication course opens numerous opportunities to enhance productivity (Eunson 2007, 51). Organizations face a number of communication challenges in the workplace. First, language barrier may turn into a commu nication problem. There may be language barrier between individuals of different levels of work experience, ages, and ethnic background. Language barrier may create a misunderstanding or slow down communication that makes communication inadequate. Second, Effective and efficient communication in the workplace depends on professional connection aimed at helping in the continued development of the organization or everyday functioning of the organization (Gerson and Gerson 2007, 78). When workers allow personal concerns to have an impact on company communication, a communication difficulty arises and could exist for long before being discovered and resolved. Individuals who decline to communicate on the basis of personal conflicts may destroy the organization’s capability to engage in business and as a result, slow or deter the development of the organization. Third, one direction communication may result into an inadequate way of exchanging information all around the company. M anagerial staff and workers should give feedback every time so as to enhance the quality of information being passed on and the way in which the information is communicated. For instance, if the human resource department frequently communicates information in a way that is confusing to other individuals in the organization, then the human resource department needs to be made aware of the communication issues or else the information coming from the human resourc