人情啊人情啊

       程大哥在群里公开叫卖了，我也顺便跑到他的空间看了看，顶头那个帖子说的让人有些那啥的感觉，挺暧昧的。不过我个人用了开了一堆博，百度的空间还是很有特色的，我个人觉得百度还是少来娱乐，我始终认为搜索引擎最关键的是知识，别的东西太多了难免干扰，空间应该也尽量为这个服务，百科是一种形式，空间又是一种形式，让这里成为知识的乐园吧。

百度百度

       百度最近动作不少，主页都一直改来改去，和live.com学了一下，把登陆做在了右上角，不知道是不是下一步也会做个个性页面的定制功能。

       估计百度一片洁白的风格要改了，少儿版已经突破这一点了。顺便说一下，这个少儿版这样出现还是有些别扭，大概搞个young.baidu.com就会好一些，否则和别的东西夹杂在一起就没啥效果了。还有mp3放到了首页，应该和那个百代有关。然后看看百度产品，已经有39项，显得有些乱了。

       看到百度空间的搬家服务，这招有些损，虽然难度不算大，但明摆着挖人家墙角嘛。我到处都有博，也到处都写，搬不搬无所谓了，有空的话倒是可以体验一下搬家的感觉。

开始摸索Ajax

       对所谓的Ajax心仪已久，未敢轻动。不过这么好的一个东西，不碰一碰还真不行，尽管没有一点Js基础，还是先看看再说吧，哪怕如天轰川那样从头再来也未尝不是好事。

      首先在网上找了一个AtlasControlToolkit.exe（下载），Version1.0.60504.0，直接点击运行发现是个zip压缩包，解压后自动运行弹出一个Dos窗口，既而没有了迹象，打开VS2005也没有发现有什么改变。随后才发现打开了一个页面，刷新了一下才显示了一堆英文。大概说的就是这个东西的安装和使用，不过看了半天没看懂。

      再来一次，直接用Wrar解压那个exe到一个文件夹，完成后发现里面有VS2005的项目文件，大喜，打开之，发现里面有两个项目，一个是AtlasControlToolkit，另一个是SampleWebSite。上面自动弹出的那个英文页面就是此例站点的首页。

      明日要上班，到此为止。

武汉大学首届中国移动杯搜索大赛开始啦

协会成立后的又一大创举，但毕竟精力有限，规模谈不上盛大。

花三个小时做好了初赛的网上答题系统，结果赶上郑州的服务器遭攻击，上午刚搞好傍晚又掉了。等待吧。不知道是不是故意选在周末攻击我们的服务器，好在服务商也在积极响应。

移动很不错，支持力度很大，我们也希望人气再好一点。

http://www.infolit.cn ，有时间来看看哦

开始准备我的第一次讲座，呵呵

  上大学三年多了，听了很多牛人的讲座，有老师也有学生，这次终于也有机会登台去讲一讲。Office的使用倒不是什么太难的题目，希望不要出什么差错。

        刚搞完了一个小网站，下一个就是经管的一个管理系统，月底前还要把校友总会的网站调好运行起来，算是一个校庆的献礼。另外这个月剩下的日子，信息素养协会还要办一个全校的搜索大赛，当然，找工作也是我的一个重要内容。

        希望一切顺利！

ASP.NET2.0(VB)+ACCESS的自定义登陆页

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Login.aspx.vb" Inherits="Login" %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Login</title>
    <link href="Images/style.css" rel="stylesheet" type="text/css" />
</head>
<body>
    <form id="form1" runat="server">
    <div>
        <table style="width: 387px">
            <tr>
                <td style="width: 7px">
                    UserName</td>
                <td>
                    <asp:TextBox ID="TextBoxU" runat="server"></asp:TextBox></td>
                <td>
                    <asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server" ControlToValidate="TextBoxU"
                        ErrorMessage="*"></asp:RequiredFieldValidator></td>
            </tr>
            <tr>
                <td style="width: 7px">
                    Password</td>
                <td>
                    <asp:TextBox ID="TextBoxP" runat="server" TextMode="Password"></asp:TextBox></td>
                <td>
                    <asp:RequiredFieldValidator ID="RequiredFieldValidator2" runat="server" ControlToValidate="TextBoxP"
                        ErrorMessage="*"></asp:RequiredFieldValidator></td>
            </tr>
            <tr>
                <td style="width: 7px">
                </td>
                <td>
                    <asp:Button ID="Button1" runat="server" Text="Login" /></td>
                <td>
                    <asp:Label ID="LabelErr" runat="server"></asp:Label>
                    <asp:HyperLink ID="HyperLink1" runat="server" NavigateUrl="~/Register.aspx" Target="_self">Register</asp:HyperLink></td>
            </tr>
        </table>
   
    </div>
    </form>
</body>
</html>

————————————————————————————————————————

Imports System.Data.SqlClient
Imports System.Data
Imports System.Data.OleDb
Partial Class Login
    Inherits System.Web.UI.Page
    Public p As String   ‘保存密码
    Public t As Integer   ‘保存登陆尝试次数
    Public c As String    ‘保存成员资格
    Public Id As Integer

 

    Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
        t += 1
        If t < 5 Then

            Dim ss As String
            ss = System.Configuration.ConfigurationManager.ConnectionStrings("ilaConnectionString").ConnectionString

            Dim conn As New OleDbConnection
            conn.ConnectionString = ss

            Dim cmd As New OleDbCommand
            cmd.CommandText = "SELECT [Password],[Class],[Id] FROM [User] WHERE [Name] =?"
            cmd.Connection = conn
            ‘ Create a OleDbParameter for each parameter in the stored procedure.
            Dim userNameParam As New OleDbParameter("?", TextBoxU.Text)
            cmd.Parameters.Add(userNameParam)
            Dim reader As OleDbDataReader = Nothing

            Try
                conn.Open()

                reader = cmd.ExecuteReader
                reader.Read()

                If reader.HasRows = False Then
                    reader = Nothing
                Else

                    p = reader("Password").ToString
                    c = reader("Class").ToString
                    Id = reader("Id")
                End If

            Catch ex As Exception
                Throw New Exception(ex.Message)

            Finally
                If Not (reader Is Nothing) Then
                    reader.Close()
                End If
                If Not (conn Is Nothing) Then
                    conn.Close()
                    conn.Dispose()
                    GC.SuppressFinalize(conn)
                End If
            End Try

            If p = TextBoxP.Text Then
                Session("User") = TextBoxU.Text
                Session("C") = c
                Session("Id") = Id
                Response.Redirect("Admin/Default.aspx")
            Else
                LabelErr.Text = "Sorry,login failed!"
            End If
        Else
            LabelErr.Text = "You have failed more than five times."

        End If

    End Sub

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
       t = 0

    End Sub
End Class

一个人在梅园看电影，有点冷

先不说电影，首先记下一个可爱的小弟弟的事，我在场子中间站了一会儿觉得腿酸酸的，就到靠近大门的一侧找了个台阶边坐下。一会儿过来一个小兄弟，二话不说递给我一个面包。最后散场的时候我回到那个位置一看竟然还在，不得不把这份意外的馈赠带回来了。

      前一个电影叫《Ｘ战警》，没什么值得提的，一贯的作风。后一个是《加菲猫》，不过是续，还有点意思，情节上有点老套，无非是角色互换发生的故事。还好这只猫就是讨人喜欢，现场很多人哈哈大笑，难得这么放松。

朱学恒哥哥

  等待朱学恒的时间很长，今天他终于出现了，一贯的那种黑侠的装束，高大的个子进入教五多功能厅的时候让那个门显得有点狭窄。

      下午两点半，我们的活动准时开始，作为一个组织者，我不得不把更多的心思放在会场秩序的维持和组织上，但朱的话还是深深打动了我，我如同找到了真的知己，很愿意嗲嗲的叫他一生，朱学恒哥哥，而不是横幅上的朱先生。能把公益做到实处，又做的那么洒脱，也许就是我以后要走的路。

      希望到场的人也都能有我的体会，尽自己的力量，让爱传播的更广。欢迎光临信息素养协会：www.infolit.org.cn（该网站已废弃,20250512）