<% sub show() response.write("") set conn=Server.CreateObject("ADODB.Connection") conn.mode=3 conn.Provider="Microsoft.Jet.OLEDB.4.0" conn.Open server.mappath("/db/news.mdb") on error resume next set rs = Server.CreateObject("ADODB.recordset") rs.Open "Select * from Qoutes order by totviews,lastview desc,qouteID", conn,1, 2, &H0001 if rs.EOF then rs.movefirst if rs.fields("lastview")+6 >= date() then Response.Write(rs.Fields("qoute").value) else rs.fields("totviews")=rs.fields("totviews")+1 'add counter rs.update rs.movenext Response.Write(rs.Fields("qoute").value) 'show next qoute rs.fields("lastview")=date() rs.update() end if rs.close conn.close end sub %>
Sheila Kutner, Business Coach, PA

If you're looking to see breakthrough improvements in your business or personal life, you've come to the right place.

I work with inspired, intelligent and willing people on improving communication. And, quite frankly, whether we’re talking about things that are important to your business or personal success, it’s ALL about communication!

Powerful Leadership is Communication...
Selling Effectively is Communication...
Fostering Diversity is Communication...
Managing Conflict and Stress is Communication...
Developing High Performance Teams is Communication...
Retention of Employees is Communication…

           
You get the idea! After working with me, my clients have successfully:

If working together on your communication challenges is starting to sound like a good idea to you, please spend a few minutes here to learn more about it (and about me).
Then get in touch so that, together, we can begin to work toward your goals.

 

 

Sheila Kutner is a Communication Coach and Communication Consulting Trainer that offers Communication Coaching, Communication Consulting Training Employee Communication Training to help you provide productive communication in the workplace.

 

Be sure to request your FREE 1/2 Hour Trial Coaching Session!