<% Function ReplaceTest(strr) Dim regEx, str1 str1 =strr Set regEx = New RegExp regEx.Pattern = "<[^>]*>" regEx.IgnoreCase = True regEx.Global = True ReplaceTest = regEx.Replace(str1,"") End Function dim rs dim stt set rs=Server.CreateObject("ADODB.Recordset") %> 山东大学——药学院
Historical Changes
The school has one postdoctoral working station for pharmacy, doctor ' s degree programs for the first-rate disciplines in pharmacy, and programs which cover all the second-rate disciplines (including: Medicinal Chemistry, Pharmaceutics, Pharmaceutical Analysis, Microbiological and Biochemical Pharmacy, Pharmacology and Pharmacognosy). It offers three specialities : Pharmaceutical, Pharmaceutical Engineering and Clinical Pharmacy with 673 students, which includes 516 undergraduates, 146 candidates for master ' s degrees, and 11 candidates for doctor ' s degrees.

Teaching Staff
Organization
Majors
Speciality of Pharmacy
Speciality of Pharmaceutical Engineering
Speciality of Clinical Pharmacy
更多 更多 更多 更多