% Session("intDomainID") = 566 Session("strUserRole") = "Editor" set adoConn = Server.createobject("ADODB.Connection") adoConn.open "MIEWDB" set adoRS = Server.createobject("ADODB.Recordset") '取得流水號 strSQL = "SELECT * FROM tblNO WHERE id_fun = 'online_count'" set adoRS = adoConn.Execute(strSQL) intTerm = adoRS.Fields("id_number").value intTerm = intTerm + 1 strSQL = "UPDATE tblNO SET id_number = '" & CStr(intTerm) & "' WHERE id_fun = 'online_count'" adoConn.Execute(strSQL) %>
|
(Clinical
Decision Support System for Infectious Disease ) |
|||||
|
|
Dictionary | Bayesian | Consultation | Help Online | Management |