asp考试系统

				
				
								 	dim  L_TypeID,sql,testID
					testID=Request.QueryString("testID")
					L_TypeID=Request.QueryString("L_TypeID")
					sql="delete from L_types where L_TypeID="&L_TypeID
					
					dim conn
					set conn=Server.CreateObject("ADODB.CONNECTION")
					set conn=openExamData()
					'删除这个题型下属的所有内容
					'delTypeAll(TypeID)
					conn.execute(sql)
					response.Redirect("../../view.asp?testID="&testID)
				 %>
				 
				
				
				
				无标题文档