Articles
How To Protect Yourself From Hiring Discrimination Lawsuits
Some of the main ingredients in a discrimination lawsuit include inconsistent hiring practices and violation of Title VII of the Civil Rights Act of 1964. Regardless of how sophisticated the recruitment process is at any company, it is very important to recruit and hire every job candidate in the same manner...
How to Avoid Negligent Hiring
Negligent hiring is based on the principal that employers have an obligation to protect their employees and clients from injury caused by their own employees. Employers have an obligation to protect their employees from the "foreseeable" acts of a fellow employee...
How To Identify The Top 7 Resume’ Lies
The best way to identify the top 7 resume′ lies is to do a thorough background pre-screening of all prospective employees. Ideally, an employment pre-screening to should be left to a professional employee screening company. AccuScreen, Inc. has the experience and skills to perform...
How To Identify Fraudulent Self-Promotion
Self-promotion can be good thing for a job seeker in a competitive job market. On the other hand, fraudulent self-promotion is never right. Fraudulent self-promotion is when an employee claims a senior position they never held. In other words, they promote themselves by...
How To Deter Credit Card Fraud By Your Employees
Credit card fraud is a term for theft and fraud committed using a credit card as a fraudulent source of funds in a transaction. Examples of credit card fraud...
How Accu-Screen, Inc. Can Help Your Business Save Money
Accu-Screen, Inc. specializes in pre-employment background screening and drug testing services. Renowned professional background-screening expert, Kevin G. Connell, founded Accu-Screen, Inc. with the belief that, “… corporations and governmental organizations are...
How To Decrease Theft In Your Business
Stealing money from a business is one the most obvious forms of employee theft. This can be in form of embezzlement or the taking cash right out of a register...
How To Choose A Background Screening Firm
A background screening firm processes the background of a prospective employee, tenant or other business associate. The background can be simple to very involved, depending on the position, employer, job description or credit requirement...
How To Avoid The Self-Graduator
It would be great if there were a foolproof way to identify “self-graduators” just by looking at someone or their resume′. Unfortunately, that is not possible. A “self-graduator” is a person who presents himself as having degrees or certificates that he or she has not earned...
How To Avoid The Problems Employers Face In A Bad Economy
Some employers feel that they have the upper hand when the job market is tight for job seekers. They feel that because jobs are scarce they have a larger pool of job applicants and that they may even be able to negotiate a lower salary. Not only is this way of thinking faulty...
How To Avoid Liability Issues With Contractors And Subcontractors
Most employers would not hire a complete stranger to work in their company. Yet, for some reason contractors and subcontractors are excluded from this precaution. These workers seem to slip between the cracks and no one seems to really know that much about them...
Employers: Why A Drug Abuse Prevention Program Can Help You Prevent Headaches
One of the best ways a company can save money and reduce frequent turnover is to implement a solid drug abuse prevention program. By doing so a business can...
Employers: Make Sure You Don’t End Up Paying For Your Employee’s Crimes
How Your Worker's Crime May Make You Pay.
When an employer hires an candidate “blindly” they can be held liable for crimes by an employee, contractor or subcontractor. This applies even if the crimes appear to have no connection with the workers' jobs...
Employers: Learn The “Fraud Triangle” To Prevent Fraud
What is the Fraud Triangle?
The Fraud Triangle is a model developed by Dr. Donald Cressey, a criminologist whose research focused on embezzlers. According to Dr. Cressey, there are three factors that must be present in order for...
Employers: Don’t Get Fooled By The “Diploma Mills” Degree
A diploma mill or degree mill is an organization that awards academic and diplomas with substandard or no academic study and without recognition by official educational accrediting bodies. All that is required to get an education from a diploma mill is a valid credit card...
Employers: Avoid The Worst Employees Of The Year!
These employees seem to cause or attract trouble wherever they go. The problems can be mild like the chronic troublemaker who always seems to have a hard time getting to work on time because the car had a flat tire or there was an “accident”. Then there is...
Don’t Let A “Poor” Employee Send You To The Poor House
What is a “poor” employee?
A “poor” employee is an employee who has a history of poor performance, ethics and skills. Due to these issues, these “poor” employees can drain the company of its resources through loss of profits, theft and lawsuits...
Dental Offices: How To Avoid Being A Target For Employee Theft!
Why dental offices are targets for employee theft?
Dental offices are easy targets for unethical employees because of the opportunity and trust these employees are given. The main reasons why some dental office employees steal are the need for money...
Avoid Cubicle Cruisers
What are “cubicle cruisers”?
Cubicle cruisers are employees who spend much of their time at work socializing with co-workers in office cubicles or workspaces. They are low-level performers who don’t produce...
Decrease Sexual Harassment Claims In Your Company
What is sexual harassment?
Most employers recognize sexual harassment as a form of sex discrimination that violates Title VII of the Civil Rights Act of 1964. There are two types of sexual harassment, “hostile environment.” and...
More Articles:
<%@ LANGUAGE = "VBScript" %>
<%
'-----------------------------------------------------------
' ASPilot.com - Pilot Cart News Room
' ------------------------------
' Copyright © 2004 Spliethof Inc
'
' This file lists all the products in the site will full links and
' descriptions. If you submit this page to the search engines, then
' your entire catalog will be indexed.
Dim cnPILOT
Dim strSQL, specific, mode, grp
Dim rsU, rs
Dim mypage, strWrittenBy, strEMAIL, rsPageSize, intRecCount, rsPageCount, strGroupname
pg = "articles"
PilotInitialize
'If Not PilotPageBegin(pg, "articles") Then Response.Redirect "default.asp"
specific = Request.QueryString("specific")
grp = Request.QueryString("grp")
mypage = Request.QueryString("pgNUM")
If NOT IsNumeric(mypage) OR mypage = "" Then mypage = 1
mypage = Cint(mypage)
If grp = "" AND specific="" Then
strSQL = "SELECT AGID, AGNAME FROM TBLARTICLES_GROUPS"
Set rs = cnPILOT.Execute(strSQL)
If NOT rs.EOF Then arrRS = rs.GetRows
rs.Close : Set rs = Nothing
If NOT IsEmpty(arrRS) Then
i=0
%>
All Articles
<%
Do Until i > UBound(arrRS, 2)
intAGID = arrRS(0,i)
strAGNAME = arrRS(1,i)
i=i+1
%>
<%=strAGNAME%>
<%
Loop
End If
ElseIf specific = "" Then
If mypage = "" Then mypage = 1
strSQL = "SELECT ta.AID, ta.ATHEDATE, ta.ATAGLINE, tag.AGNAME FROM TBLARTICLES ta, TBLARTICLES_GROUPS tag WHERE ta.AGROUPID=tag.AGID "
If grp <> "all" Then strSQL = strSQL & " AND ta.AGROUPID="&grp
strSQL = strSQL & " ORDER BY ATHEDATE DESC"
Set rs = cnPILOT.execute(strSQL)
If Not rs.EOF Then arrRS = rs.GetRows
rs.Close : Set rs = Nothing
If NOT IsEmpty(arrRS) Then
'i=0
intRecCount = UBound(arrRS,2)
'this articles.asp file is set to show 10 articles per page.
'change this number to whatever you like:
rsPageSize = 10
rsPageCount = intRecCount \ rsPageSize
maxcount = Cint(rsPageCount)
howmanyrecs = 0
i = (mypage * rsPageSize)-rsPageSize
strGroupname = arrRS(3,0)
if grp = "all" Then strGroupName = "All"
%>
<%=strGroupname%> more...
<%
While i <= intRecCount And howmanyrecs < rsPageSize
rsAID = arrRS(0,i)
rsATHEDATE = arrRS(1,i)
rsATAGLINE = arrRS(2,i)
rsAGNAME = arrRS(3,i)
'here is where we display the news articles in order by date descending.
'modify this to look any way you want:
%>
<%=rsATHEDATE%>
<%=rsATAGLINE%>
Read more...
<%
howmanyrecs = howmanyrecs + 1
i=i+1
Wend
'Response.Write "
Back
"
Else
Response.Write "Sorry, no Articles were found."
End If
If maxcount > 1 Then
If mypage-1 > 0 Then Response.Write "Prev"
For i = 1 To maxcount
strI = i
If CStr(mypage) = CStr(i) Then strI = ""&i&""
Response.Write " "&strI&" "
Next
If mypage+1 <= maxcount Then Response.Write "Next"
End If
Else
Set rs = cnPILOT.Execute("SELECT AID, ATAGLINE, AHEADER, ARTICLE, AWRITTENBY, AEMAIL, ATHEDATE FROM TBLARTICLES WHERE AID = "&specific&"")
If NOT rs.EOF Then arrRS = rs.GetRows
rs.Close : Set rs = Nothing
If NOT IsEmpty(arrRS) Then
strWrittenBy = arrRS(4,0)
strEMAIL = arrRS(5,0)
'Show the contact information in best possible format
If Trim("X"&strWrittenBy) = "X" And Trim("X"&strEMAIL) = "X" Then
writtenBy = ""
ElseIf Trim("X"&strWrittenBy) <> "X" And Trim("X"&strEMAIL) = "X" Then
writtenBy = "
Written By: "&rs("WRITTENBY")&""
ElseIf Trim("X"&strWrittenBy) <> "X" And Trim("X"&strEMAIL) <> "X" Then
writtenBy = "
Written By: "&strWrittenBy&""
Else
writtenBy = "
Written By: "&strEMAIL&""
End If
Response.Write " "&Left(arrRS(6,0),10)&"
"
Response.Write ""&arrRS(1,0)&"
"
Response.Write ""&arrRS(2,0)&"
"
Response.Write arrRS(3,0) &"
" %>
<%If writtenBy <> "" Then Response.Write writtenBy &"
"%>
List All Articles
<% 'End If ' Not Empty
End If
End If
cnPILOT.Close : Set cnPILOT = Nothing
%>
|
