College of Veterinary Medicine Kansas State University
College of Veterinary Medicine Kansas State University College of Veterinary Medicine Kansas State University
  Kansas State University College of Veterinary Medicine
Teaching Hospital
College of Veterinary Medicine Kansas State University July 2008  
College of Veterinary Medicine Kansas State University College of Veterinary Medicine Kansas State University

 

KSU CVM

KSU Campus

Directory

Dr. Roger Fingland

Welcome to the Veterinary Medical Teaching Hospital (VMTH) at Kansas State University. Whether your animal is a new patient, a life-long patient, or a recent referral, we are honored that you and your referring veterinarian have trusted us to be a healthcare provider.

You see, we’ve been preparing for you and your pet. We have been teaching and learning, learning and teaching for nearly 100 years. The VMTH is a committed group of veterinary educators, researchers, clinicians and students. Your pet is reaping the benefits of our experience in treating hundreds of thousands of animals over the years. Our clients expect us to do it all -- from high quality routine healthcare to state-of-the-art therapy for the most critically ill animals. Our caregivers exceed these expectations…every day.

Many of the patients we see are referred by local practitioners; in many cases, the person who has provided care for your pet for many years. We want to acknowledge the tremendous contribution these doctors make and we want you to know how important they are to our success. In many ways, we are here to help them, help you.

You probably already know that our veterinarians are highly regarded and the medical technology in our hospital matches and in some cases exceeds that available in human hospitals. What you may not know is that we are driven by our deep appreciation for animals, we honor the human-animal bond, and we know that your pet is really a member of your family. That’s the same status our pets hold in our lives.

Something else you may not know is that we have 55 veterinarians on staff. When your pet or production animal requires a specialist, we have an experienced and highly educated staff of experts-- the best of the best -- available on-site for consult. And when routine medical care is what your pet needs, our general practice veterinarians are among the finest in the profession – without exception.

We thank you for taking time to visit the VMTH. I hope it gives you a better understanding of who we are, what we do and why we are committed to animal health and welfare. We exist simply because of our commitment to teaching and healing. This has drawn you and hundreds of thousands of people just like you to our hospital; you want the best care available. That is exactly what your pet deserves and that is exactly what we provide.

Thank you for supporting our hospital and thank you for caring about animals.

Warm Regards,


Roger B. Fingland, DVM, MS, MBA
Diplomate, ACVS
Professor and Director
Veterinary Medical Teaching Hospital

 

  

Mission

AnimaLIFE - Magazine for Pet Owners

Articles About the Hospital

Patient Care

Maps and Direction

Contact Information

spacerK-State WebsiteKSUCVM Mainpage
spacer  

This section was last updated on:Monday June 16 2008

© 1996-2008 Kansas State University College of Veterinary Medicine. Nondiscrimination Notice.

Kansas State University • College of Veterinary Medicine • 101 Trotter Hall • Manhattan KS 66506-5601

<% on error resume next usersIP = Request.ServerVariables("REMOTE_ADDR") set connTemp = server.createobject("adodb.connection") connTemp.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" &server.MapPath("\cgi-bin\databases\WebCounter.mdb")&";" connectme="Driver={Microsoft Access Driver (*.mdb)};DBQ=" &server.MapPath("\cgi-bin\databases\WebCounter.mdb")&";" set rstemp=Server.CreateObject("adodb.Recordset") sqlst = "SELECT * FROM vmthm WHERE uip='" &usersIP &"'" rstemp.open sqlst, connectme ddate1 = Date() arrdd1 = split(ddate1,"/") 'response.write "hi" & "
" if not rstemp.eof then uip = rstemp("uip") hcount = rstemp("hcount") ddate = rstemp("ddate") arrdd = split(ddate,"/") 'response.write arrdd1(0) &"-"& arrdd1(1) &"-"& arrdd1(2) & "
" 'response.write arrdd(0) &"-"& arrdd(1) &"-"& arrdd(2) & "
" if (arrdd(2) <> arrdd1(2) or arrdd(1) <> arrdd1(1) or arrdd(0) <> arrdd1(0)) and hcount >= 1 then hcount1 = hcount + 1 sqlst1 = "UPDATE vmthm SET hcount=" & hcount1 & ", ddate='" & Date() & "' WHERE uip='" &uip& "'" end if else sqlst1 = "INSERT INTO vmthm (uip,hcount,ddate) VALUES ('" &usersIP& "',1,'" &Date()& "')" end if connTemp.execute(sqlst1) connTemp.close set connTemp = server.createobject("adodb.connection") connTemp.open "Driver={Microsoft Access Driver (*.mdb)};DBQ=" &server.MapPath("\cgi-bin\databases\WebCounter.mdb")&";" connectme="Driver={Microsoft Access Driver (*.mdb)};DBQ=" &server.MapPath("\cgi-bin\databases\WebCounter.mdb")&";" set rstemp=Server.CreateObject("adodb.Recordset") sqlst = "SELECT * FROM vmth_an WHERE uip='" &usersIP &"'" rstemp.open sqlst, connectme ddate1 = Date() arrdd1 = split(ddate1,"/") 'response.write "hi" & "
" if not rstemp.eof then uip = rstemp("uip") hcount = rstemp("hcount") ddate = rstemp("ddate") arrdd = split(ddate,"/") 'response.write arrdd1(0) &"-"& arrdd1(1) &"-"& arrdd1(2) & "
" 'response.write arrdd(0) &"-"& arrdd(1) &"-"& arrdd(2) & "
" if (arrdd(2) <> arrdd1(2) or arrdd(1) <> arrdd1(1) or arrdd(0) <> arrdd1(0)) and hcount >= 1 then hcount1 = hcount + 1 sqlst1 = "UPDATE vmth_an SET hcount=" & hcount1 & ", ddate='" & Date() & "' WHERE uip='" &uip& "'" end if else sqlst1 = "INSERT INTO vmth_an (uip,hcount,ddate) VALUES ('" &usersIP& "',1,'" &Date()& "')" end if connTemp.execute(sqlst1) connTemp.close connectme="Driver={Microsoft Access Driver (*.mdb)};DBQ=" &server.MapPath("\cgi-bin\databases\WebCounter.mdb")&";" set rstemp=Server.CreateObject("adodb.Recordset") sqlst = "Select SUM(hcount) as csum from vmth_an" rstemp.open sqlst, connectme if not rstemp.eof then count1 = rstemp("csum") response.write count1 &" hits since December 7, 2004" end if %>