<%@LANGUAGE="VBSCRIPT"%> <% ' *** Edit Operations: declare variables Dim MM_editAction Dim MM_abortEdit Dim MM_editQuery Dim MM_editCmd Dim MM_editConnection Dim MM_editTable Dim MM_editRedirectUrl Dim MM_editColumn Dim MM_recordId Dim MM_fieldsStr Dim MM_columnsStr Dim MM_fields Dim MM_columns Dim MM_typeArray Dim MM_formVal Dim MM_delim Dim MM_altVal Dim MM_emptyVal Dim MM_i MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME")) If (Request.QueryString <> "") Then MM_editAction = MM_editAction & "?" & Server.HTMLEncode(Request.QueryString) End If ' boolean to abort record edit MM_abortEdit = false ' query string to execute MM_editQuery = "" %> <% ' *** Insert Record: set variables If (CStr(Request("MM_insert")) = "form1") Then MM_editConnection = MM_LT_STRING MM_editTable = "yd631_call" MM_editRedirectUrl = "supportssure.asp" MM_fieldsStr = "yd631_name|value|yd631_call|value|yd631_address|value|yd631_email|value|yd631_msn|value|yd631_pname|value|yd631_content|value" MM_columnsStr = "yd631_name|',none,''|yd631_call|',none,''|yd631_address|',none,''|yd631_email|',none,''|yd631_msn|',none,''|yd631_pname|',none,''|yd631_content|',none,''" ' create the MM_fields and MM_columns arrays MM_fields = Split(MM_fieldsStr, "|") MM_columns = Split(MM_columnsStr, "|") ' set the form values For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_fields(MM_i+1) = CStr(Request.Form(MM_fields(MM_i))) Next ' append the query string to the redirect URL If (MM_editRedirectUrl <> "" And Request.QueryString <> "") Then If (InStr(1, MM_editRedirectUrl, "?", vbTextCompare) = 0 And Request.QueryString <> "") Then MM_editRedirectUrl = MM_editRedirectUrl & "?" & Request.QueryString Else MM_editRedirectUrl = MM_editRedirectUrl & "&" & Request.QueryString End If End If End If %> <% ' *** Insert Record: construct a sql insert statement and execute it Dim MM_tableValues Dim MM_dbValues If (CStr(Request("MM_insert")) <> "") Then ' create the sql insert statement MM_tableValues = "" MM_dbValues = "" For MM_i = LBound(MM_fields) To UBound(MM_fields) Step 2 MM_formVal = MM_fields(MM_i+1) MM_typeArray = Split(MM_columns(MM_i+1),",") MM_delim = MM_typeArray(0) If (MM_delim = "none") Then MM_delim = "" MM_altVal = MM_typeArray(1) If (MM_altVal = "none") Then MM_altVal = "" MM_emptyVal = MM_typeArray(2) If (MM_emptyVal = "none") Then MM_emptyVal = "" If (MM_formVal = "") Then MM_formVal = MM_emptyVal Else If (MM_altVal <> "") Then MM_formVal = MM_altVal ElseIf (MM_delim = "'") Then ' escape quotes MM_formVal = "'" & Replace(MM_formVal,"'","''") & "'" Else MM_formVal = MM_delim + MM_formVal + MM_delim End If End If If (MM_i <> LBound(MM_fields)) Then MM_tableValues = MM_tableValues & "," MM_dbValues = MM_dbValues & "," End If MM_tableValues = MM_tableValues & MM_columns(MM_i) MM_dbValues = MM_dbValues & MM_formVal Next MM_editQuery = "insert into " & MM_editTable & " (" & MM_tableValues & ") values (" & MM_dbValues & ")" If (Not MM_abortEdit) Then ' execute the insert Set MM_editCmd = Server.CreateObject("ADODB.Command") MM_editCmd.ActiveConnection = MM_editConnection MM_editCmd.CommandText = MM_editQuery MM_editCmd.Execute MM_editCmd.ActiveConnection.Close If (MM_editRedirectUrl <> "") Then Response.Redirect(MM_editRedirectUrl) End If End If End If %> 南海朗肽制药有限公司
  --> 记住最佳的服药时间
     
    近年来,随着医药科学的发展,专家们发现许多药物的疗效与用药时间密切相关。这是因为人体的生理和病理变化与昼夜节律波动现象有关。故此,应根据疾病的昼夜节律波动规律,选择最佳服药时间,达到最佳疗效。

  铁剂:贫血患者补充血剂,如果晚上7点服用,比早上7点服用在血中的浓度增加4倍,疗效最好。

  钙剂:人体的血钙水平在午夜至清晨最低。故临睡前服用补钙药可使钙得到充分的吸收和利用。

  降血压药物:根据人体生物钟的节律,服降血压药1日3次,宜分别于早上7时,下午3时和晚上7时服用,早晚两次的用药量比下午用量要适当少些。晚上临睡前不宜服用降压药,以防血压过低和心动过缓,致脑血栓形成。

  抗菌素及消炎类药物:抗菌素药物排泄较快,为了在血液中保持一定浓度,每隔6小时应服药1次。消炎药物,如风湿性或类风湿性关节炎患者,多于每天清晨和上午关节疼痛较重。如服消炎止痛等药物,可在早晨加大剂量服1次,效果最好,且可免去中午的1次服药。

  降糖药:糖尿病患者在凌晨对胰岛素最敏感,这时注射胰岛素用量小,效果好。甲糖宁(D860)宜上午8时口服,作用强而且持久,下午服用需要加大剂量才能获得相同的效果。

  强心药:心脏病患者对洋地黄、地高辛和西地兰等药物,在凌晨时最为敏感,此时服药,疗效倍增。

  抗哮喘药:氨茶碱宜在早上7时左右服用,效果最佳。

  抗过敏药:赛庚啶于早上7时左右服用,能使药效维持15~17小时,而晚上7时服用,只能维持6~8小时。

  激素类药:人体对激素类药的反应也有时间节律。由于人体肾上腺皮质激素的分泌高峰在上午7时左右,故在每天上午7时一次性给药疗效最佳。

  解热镇痛药:如阿司匹林在早上7时左右(餐后)服用疗效高而持久,若在下午6时和晚上10时服用,则效果较差。

  降胆固醇药:由于人体内的胆固醇和其它血脂的产生在晚上会增加,因此,病人宜在吃晚饭时服用降胆固醇的药物。

  催眠药、驱虫药、避孕药,一般宜在晚上临睡前半小时服用。抑制胃酸的雷尼替丁、法莫替丁可以选择每晚睡前服用,因为胃酸的分泌有昼少夜多的规律。

 
【 关闭 】