Login to Blackboard

Login to UHV Email

Login to MyUHV

University Calendar

Latest News

<% Dim Connection Dim RecordSet Dim Date Dim Count Set Connection = Server.CreateObject("ADODB.Connection") Connection.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\Web\fpdb\newswire.mdb;" strSQL = "SELECT TOP 3 * FROM releases WHERE txtTopic='Arts & Sciences' OR txtTopic='ABR' ORDER BY id DESC" Set RecordSet = Server.CreateObject("ADODB.RecordSet") RecordSet.Open strSQL,Connection Date = Now() Count = 0 Do While not (RecordSet.EOF OR RecordSet.BOF) Count = Count + 1 %>

"><%=RecordSet.Fields("Title")%>
<%=RecordSet.Fields("txtMonth")%>/<%=RecordSet.Fields("txtDay")%>/<%=RecordSet.Fields("txtYear")%>

<% RecordSet.MoveNext Loop RecordSet.Close If Count <= 0 Then %>

Section unavailable.

<% End If Connection.Close Set Connection = Nothing Set Access = Nothing Set RecordSet = Nothing %>

UNDERGRADUATE PROGRAMS

• Bachelor of Applied Arts & Sciences
  
• B.S. Biology
  
• B.A./B.S. Communication
  
• B.A. Communication Design
  
• B.S. Computer Science
  
• B.A. Creative Writing
  
• B.S. Criminal Justice
  
• B.S. Digital Gaming and Simulation
  
• B.A. English
  
• B.A. History
  
• B.S. Information Systems
  
• B.A./B.S. Mathematics
  
• Political Science (Minor Only)
  
• B.A./B.S. Psychology
  
• B.A. Spanish
  

Minors

GRADUATE PROGRAMS

• M.S. Computer Information Systems
  
• M.A. Counseling Psychology
  
• M.A. Forensic Psychology
  
• M. A. Interdisciplinary Studies
  
• M.A. School Psychology
  
• M.S. Publishing