% elmer="elmer" Dim Conn1,strConn1 Set Conn1=Server.CreateObject("Adodb.Connection") strConn1="Driver={Microsoft Access Driver (*.Mdb)};Pwd=;Dbq=" & Server.MapPath("asp/jsq.mdb") Conn1.Open strConn1 SQL="select * from counter where username='"&elmer&"'" set rscounter=Conn1.execute(SQL)%> <%application("newkucounter")=rscounter("allcounter") application.lock application("newkucounter")=application("newkucounter")+1 application.unlock allcounter=application("newkucounter") SQL="update counter set allcounter='"&allcounter&"' where username='"&elmer&"'" set rs=Conn1.execute(SQL) %>
|
|未解之谜|生命溯源|史前文明|航空航天|宇宙天文|飞碟文化|飞碟图片|飞碟实录|国内报道|国外报道|最新事件|飞碟探索|精品论文|首页
|
|
与外星人面对面 六大探索寻找人类外星朋友(1) 孙展 |
|
|
|
外星人会不会来到我们身边,外星人和我们有什么共同之处,我们看到的流星雨和地球有什么关系,探测月球有什么好处?提起外星人,大多数人都会立刻想起科幻小说、电影里出现的形象,在每个人心中都有关于地外文明的疑问。这些疑问将在中央电视台元旦前夕转播的纪念"科学先生"卡尔·萨根的"科学与公众论坛"上得到解答。在会上,来自各国的科学家向大家讲述了人们关心的"外星人"、"登月计划"和"不明飞行物"的奥秘。而让人们感到最兴奋的就是关于地外文明的探索。
|
|
|