卡卡工作室

    摘要：

part1:
http://hk.news.yahoo.com/060823/12/1rtua.html
南極臭氧洞60年內消失

http://big5.xinhuanet.com/gate/big5/news.xinhuanet.com/politics/2006-08/23/content_4998528.htm
我國法院首次對中日曆史事件作出判決

http://news.qianlong.com/28874/2006/08/23/225@3381    （全文共3669字）——点击此处阅读全文

unit Unit1;

interface

uses
  Windows, SysUtils, Classes, Forms, ShellAPI, Controls, StdCtrls;

type
  TForm1 = class(TForm)
    GroupBox1: TGroupBox;
    ListBox: TListBox;
    Label1: TLabel;
    Label2: TLabel;
    procedure Label1Click(Sender: TObject);
    procedure FormShow(Sender: TObject);
  private
    { Private declarations }
  public
    hMPR: THandle;
  end;

var
  Form1: TForm1;

const
  Count: Integer = 0;

function WNetEnumCachedPasswords(lp: lpStr; w: Word; b: Byte; PC: PChar; dw: DWord): Word; stdcall;

implementation

{$R *.DFM}
function WNetEnumCachedPasswords(lp: lpStr; w: Word; b: Byte; PC: PChar; dw: DWord): Word; external mpr name 'WNetEnumCachedPasswords';

type
PWinPassword = ^TWinPassword;
TWinPassword = record
  EntrySize: Word;
  ResourceSize: Word;
  PasswordSize: Word;
  EntryIndex: Byte;
  EntryType: Byte;
  PasswordC: Char;
  end;

var
  WinPassword: TWinPassword;

function AddPassword(WinPassword: PWinPassword; dw: DWord): LongBool; stdcall;
var
  Password: String;
  PC: Array[0..$FF] of Char;
begin
  inc(Count);

  Move(WinPassword.PasswordC, PC, WinPassword.ResourceSize);
  PC[WinPassword.ResourceSize] := #0;
  CharToOem(PC, PC);
  Password := StrPas(PC);

  Move(WinPassword.PasswordC, PC, WinPassword.PasswordSize + WinPassword.ResourceSize);
  Move(PC[WinPassword.ResourceSize], PC, WinPassword.PasswordSize);
  PC[WinPassword.PasswordSize] := #0;
  CharToOem(PC, PC);
  Password := Password + ': ' + StrPas(PC);

  Form1.ListBox.Items.Add(Password);
  Result := True;
end;

procedure TForm1.Label1Click(Sender: TObject);
begin
  ShellExecute(GetDesktopWindow, 'open', 'http://www.utilmind.com', nil, nil, 0);
end;

procedure TForm1.FormShow(Sender: TObject);
begin
  if WNetEnumCachedPasswords(nil, 0, $FF, @AddPassword, 0) <> 0 then
  begin
    Application.MessageBox('Can''t load passwords: User is not logon.', 'Error', mb_Ok or mb_IconWarning);
    Application.Terminate;
  end
  else
  if Count = 0 then
    ListBox.Items.Add('No passwords found...');
end;

end.

利用API函数[mciSendString]可以轻松实现MP3音乐文件的播放。下面这段程序实现了MP3播放的大部分常规操作，对其稍加修改，做一个100KB大小的MP3播放器轻而易举

    启动VB程序，在窗体上放置6个命令按钮，三个标签，一个公用对话框、一个进度条、一个状态栏和一个计时器，窗本的布置请参考附图

按钮"Open MP3 File"是用来打开对话框选择MP3文件，其他5个按钮分别为Play(播放)、Pause(暂停)、Stopplay(停止播放)、Back(向后跳跃)、Prew(向前跳跃)。Label1用来表示歌曲当前时间；label2放在时度条的最左边，Caption属性为"00：00"；lable3放在时度条的右边，用来表示歌曲总长。

   下面就可以编写代码了。首先在窗体的"通用声明"部分声明函数
    Private Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA"(Byval lpstrCommand As String,ByVal lpstrRetumString As String,ByVal uReturnLength As long,ByVal hwndCallback as long) As long
   
    Dim mfn As String

     下面就是各个对象的代码了：
Private Sub Form_load()
  mfn=""
  play.Enabled=False
  pause.Enabled=False
  Stopplay.Enabled=False
  back.Enabled=False
  prew.Enabled=False
  Timer1.Enabled=False
  Timer1.Interval=500
End Sub

Private Sub open_Click()
  On Error Goto err
  With CommonDialog1
       .CancelError=True
      .Filter="音乐文件|*.mp3;*.wav;*.mid"
      .Flags=cdlOFNNoChangeDir And cdlOFNPathMustExist
      .Action=1
      stopplay_Click '停止按钮同时可以设备初始化
      mfn=.FileName  '这个程序中文件名一定不能带空格
      Form1.Caption=.FileName
      play.Enabled=True
  End With
  play_Click
Exit Sub
  err:
End Sub

Private Sub play_Click()
  On Error Resume Next
  Dim t As Long
  t=mciSendString("open " + mfn,0&,0,0) 'Open后边的空格一定不能丢
  Dim ret As String * 128
  t=mciSendString("status " + mfn + " length",ret,128,0)
'显示歌曲总长
  ret=Left(ret,8)
  If ret<>"" Then
       ProgressBar1.Min=0
      ProgressBar1.Max=Val(ret)
      Label3.Caption=gettime(Val(ret))
  End If
  play.Enabled=False
  pause.Enabled=True
  stopplay.Enabled=True
  back.Enabled=True
  prew.Enabled=True
  t=mciSendString("status " + mfn +" mode",ret,128,0)
'得到设备的当前状态，是播放还是暂停等等
  ret=Left(ret,8)
  StatusBar1.Panels(1).text=ret
'在状态栏显示播放状态
  t=mciSendString("play " + mfn + " form " + Str(ProgressBar1.Value),0&,0,0)
'开始播放
  Timer1.Enabled=True
End Sub

Private Sub pause_Click()
  t%=mciSendString("pause " + mfn,0&,0,0)
'发出暂停的命令
  play.Enable=True
  pause.Enabled=False
  stopplay.Enabled=True
  back.Enabled=False
  prew.Enabled=False
End Sub

Private Sub stopplay_Click()
  t%=mciSendString("stop " + mfn,0&,0,0)
  t%=mciSendString("close " + mfn,0&,0,0)
'停止播放
  play.Enabled=True
  pause.Enabled=False
  stopplay.Enabled=False
  back.Enabled=False
  prew.Enabled=False
End Sub

Private Sub back_Click()
  t%=mciSendString("play " + mfn + " from " + Str(ProgressBar1.Value-(ProgressBar1.Max\10)),0&,0,0) '向后跳一小段再播放
End Sub

Private Sub prew_Click()
t%=mciSendString("play " + mfn + " from " + Stri(ProgressBar1.Value+(ProgressBar1.Max\10)),0&,0,0) '向前跳一小段再播放
End Sub

Private Sub Timer1_Timer()
  Dim t As Long
  Dim ret As String * 128
  t=mciSendString("status " + mfn + " position",ret,0,0)
'得到当前播放位置
  ret=left(ret,8)
  ProgressBar1.Value=Val(ret)
  Label1.Caption=gettime(Val(ret))
'显示歌曲当前时间
  If ProgressBar1.Value=ProgressBar1.Max Then
      stopplay_Click
  End If
  t=mciSendString("status " + mfn + " mode",ret,128,0)
  ret=Left(ret,8)
  StatusBar1.Panels(1).Text=ret
End Sub

Private Sub Form_Unload(Cacel As Integer)
  t%=mciSendString("stop " + mfn,0&,0,0)
  t%=mciSendString("close " + mfn,0&,0,0)
End Sub

Private Function Gettime(position As Long) As String
'这个函数的功能是把以长整型表示的时间转换为电子钟式的"**:**"
  Dim min,sec
  min=position/1000
  min=min/60
  sec=min-Int(min)
  min=Int(min)
  sec=60 * sec / 100
  sec=Int(sec * 100)
  gettime=Str(min) + ":" + Str(sec)
End Function

图中5个控制按钮，其实是把字体设为"Webdings"，让它们的Caption属性分别为"4" ";" "<" "7" "8"
就可以了

    摘要：也许你并不了解硬盘分区信息应该包括些什么，但如果你曾经对硬盘分过区，你或许对此有所了解，在此为各位介绍一个用VB编写的获取硬盘分区信息的程序。在这个程序中，它将详细地告诉你：你的硬盘总容量、分过几个区、每个区的总容量、及现在剩余的可用容量、硬盘分区表为几位（即是FAT32还是FAT16），每个分区是几个字节……怎么样？够完整详细了吧！好的，就让我们一起来看一下吧：
　　首先做准备工作：在FORM1上新建二个LABEL(LABEL1和LABEL2)一个COMMAND1命令按钮。然后输入以下代码：
　　Private Declare Function GetDriveType Lib
　　kernel32“Alias "GetDriveTypeA(ByVal nDrive As String) As Long
　　Private Declare Function GetDiskFreeSpace Lib“kernel32" Alias“GetDiskFreeSpac    （全文共3009字）——点击此处阅读全文

    摘要：part 1
http://hk.news.yahoo.com/060820/12/1rn4w.html
何俊仁遭亂棍毆傷 3煞快餐店行兇 血流披面斷鼻樑

http://forum.hkgolden.com/view.asp?message=719260
網友評論

http://news.sina.com.cn/c/2006-08-20/03389795074s.shtml
此处阅读全文

Visual C++ 开发环境为控件提供的自绘制功能使程序员能够充分发挥自己的创造性来设计比较漂亮的程序界面。所谓AVI按钮是指每当鼠标从按钮上经过时就播放一段按钮提示的AVI，在许多的游戏程序以及三维动画软件中（如摩托英豪、Cool 3D等）都广泛的采用了这种AVI按钮。它使得程序的用户界面很具有动感，也使得我们的程序至少看上去更专业，本实例借助Visual C++强大的控件自绘制功能来实现这种AVI按钮的原理及实现。

　　一、实现方法

　　为了实现能够播放AVI视频流的动画按钮，还是需要利用控件的重载功能，这部分内容本书已经在《实例：实现XP风格的按钮》中介绍了，这里就不再赘述了，读者可以参考该实例查阅相关内容。本实例主要探讨如何使用MFC的CanimateCtrl动画类播放AVI格式的视频流，视频流可以来自一个AVI文件，也可以来自资源。在程序中合理地使用动画控件，可以使程序的界面更加形象生动。

　　MFC的CAnimateCtrl类封装了动画控件，该类的Create（）成员函数负责创建动画控件，其声明为：

BOOL Create( DWORD dwStyle, const RECT& rect, CWnd* pParentWnd, UINT nID );

　　函数中的参数dwStyle是如表一所示的控件风格的组合，参数rect指定了控件的尺寸，pParentWnd指向父窗口，nID是控件的ID。若创建成功则函数返回TRUE。

风格 含义
ACS_CENTER 使动画片居于控件中央，并使动画片打开后控件窗口的尺寸和位置保持不变。如果不指定该风格，则控件的尺寸会自动调整来适应动画片的大小。  
ACS_TRANSPARENT 使动画片的背景透明（不输出动画片的背景色）。
ACS_AUTOPLAY 一旦打开动画片后就一直重复播放。

表一、动画控件的风格

　　除表中的风格外，一般还要为动画控件指定WS_CHILD、WS_VISIBLE和WS_BORDER窗口风格。例如，要创建一个能自动播放的动画控件，应该指定其风格为WS_CHILD|WS_VISIBLE|WS_BORDER|ACS_AUTOPLAY。

　　CAnimateCtrl类主要的成员函数包括：BOOL Open( LPCTSTR lpszFileName )、BOOL Open( UINT nID ) 、BOOL Play( UINT nFrom, UINT nTo, UINT nRep ) 、BOOL Seek( UINT nTo )、BOOL Stop( )、BOOL Close( )等。

　　上述的Open（）函数从AVI文件或资源中打开视频流，如果参数lpszFileName或nID为NULL，则系统将关闭以前打开的视频流。Play（）函数用来播放选定的视频流，参数nFrom指定了播放的开始帧的索引，索引值必须小于65536，若为0则从头开始播放。nTo指定了结束帧的索引，它的值必须小于65536，若为-1则表示播放到视频流的末尾。nRep是播放的重复次数，若为-1则无限重复播放。Seek（）函数用来静态地显示视频流的某一帧。参数nTo是帧的索引，其值必须小于65536，若为0则显示第一帧，若为-1则显示最后一帧，若成功则函数返回TRUE。Stop（）函数用来停止动画片的播放。Close（）函数用来关闭并从内存中清除视频流。上述所有函数都是调用成功返回TRUE，否则返回FALSE。

　　读者朋友们在学习的过程中要注意，动画控件并不能播放所有的AVI文件，只有满足下列条件的AVI文件才能被播放：1）AVI文件必须是无声的，不能有声道；2）AVI文件必须是未压缩的，或是用RLE算法压缩的；3）AVI的调色板必须保持不变。另外，动画控件最大的一个局限性在于它只能显示系统调色板中缺省的颜色，因此如果用动画控件来播放一个256色的AVI文件，那么播放效果看起来就象一个16色的动画一样，很不理想。总之，动画控件只能播放一些简单的，颜色数较少的AVI动画。如果要较满意地播放256色的AVI文件，就要利用MCI接口，这部分内容请读者朋友参阅有关资料。

　　二、编程步骤

　　1、启动Visual C++6.0，生成一个基于对话框的应用程序，取其项目名为 TestAviButton, 然后按下 Finish 按钮来完成工程的创建；

　　2、使用Class Wizard菜单命令以CButton 为基类创建CAviButton 类，生成类的头文件 AviButton.h 和实现文件 AviButton.cpp，同时在类中重载 Create（）、DrawItem（）函数和 WM_MOUSEMOVE的消息映射；

　　3、打开工程中ID值为IDD_TESTAVIBUTTON_DIALOG 的对话框进行编辑，该对话框的提示文本为"将鼠标移至按钮上："删除"取消"按钮，将"确定"按钮的属性 Styles 改为 OwnerDraw ,并去掉其提示文本 "确定"；另外执行 Insert | Resource… 命令，在弹出的对话框中按下 Custom… 按钮，然后输入"AVI"，向程序中添加"AVI"格式的资源，然后选择AVI类型的文件向项目中添加"AVI"格式的资源IDR_AVI；

    4、添加代码，编译运行程序，此时每当我们的鼠标经过按钮时，一个漂亮的AVI按钮就产生了。

    三、实现代码

/////////////////////////////// AviButton.h : header file
#if !defined(AFX_AVIBUTTON_H__5E20D4EF_864E_11D7_886E_F16C81CD642B__INCLUDED_)
#define AFX_AVIBUTTON_H__5E20D4EF_864E_11D7_886E_F16C81CD642B__INCLUDED_
#if _MSC_VER > 1000
#pragma once
#endif // _MSC_VER > 1000
class CAviButton : public CButton
{
　// Construction
　public:
　　CAviButton();
　public:
　　UINT m_nAviID;
　　CAnimateCtrl AnimateCtrl;
　　BOOL bPlaying;
　　void LoadAvi(UINT nAviID);
　　void DrawButton(CDC* pDC, UINT nState, CRect rect);
　　// Overrides
　　// ClassWizard generated virtual function overrides
　　//{{AFX_VIRTUAL(CAviButton)
　　　public:
　　　　virtual void DrawItem(LPDRAWITEMSTRUCT lpDrawItemStruct);
　　　　virtual BOOL Create(LPCTSTR lpszClassName, LPCTSTR lpszWindowName, DWORD
dwStyle, const RECT& rect, CWnd* pParentWnd, UINT nID,
CCreateContext* pContext = NULL);
　　//}}AFX_VIRTUAL
　　// Implementation
　public:
　　virtual ~CAviButton();
　　// Generated message map functions
　protected:
　　//{{AFX_MSG(CAviButton)
　　　afx_msg void OnMouseMove(UINT nFlags, CPoint point);
　　//}}AFX_MSG
　DECLARE_MESSAGE_MAP()
};
#endif

////////////////////////////CAviButton.CPP文件；
#include "stdafx.h"
#include "TestAviButton.h"
#include "AviButton.h"
#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

CAviButton::CAviButton()
{
　m_nAviID = 0;
　bPlaying = FALSE;
}

CAviButton::~CAviButton()
{}
void CAviButton::LoadAvi(UINT nAviID)
{
　m_nAviID =nAviID;
}

BEGIN_MESSAGE_MAP(CAviButton, CButton)
　//{{AFX_MSG_MAP(CAviButton)
　　ON_WM_MOUSEMOVE()
　//}}AFX_MSG_MAP
END_MESSAGE_MAP()

///////////////////// CAviButton message handlers
void CAviButton::DrawButton(CDC *pDC, UINT nState, CRect rect)
{
　COLORREF upCol,downCol,edgeCol;
　edgeCol=RGB(0,0,0); //设置按钮边缘的初始化颜色；
　if ((nState & ODS_SELECTED) == ODS_SELECTED)
　{
　　//设置按钮被按下时按钮的颜色
　　upCol=RGB(0,0,0);
　　edgeCol=RGB(128,128,128);
　　downCol=RGB(0,0,0);
　}
　else
　{
　　//设置按钮正常时按钮的颜色
　　upCol=RGB(255,255,255);
　　downCol=RGB(128,128,128);
　}
　CPen* pOldPen = NULL;
　BOOL pen1Created;
　CPen pen1;
　BOOL pen2Created;
　CPen pen2;
　if (pen1Created = pen1.CreatePen(PS_SOLID, 1, upCol))
　　pOldPen = pDC->SelectObject( &pen1 );
　　//画左上边缘
　pDC->MoveTo(1,rect.Height()-1);
　pDC->LineTo(1,1);
　pDC->LineTo(rect.Width()-1,1);
　pDC->MoveTo(0,rect.Height()-1);
　pDC->LineTo(0,0);
　pDC->LineTo(rect.Width()-1,0);
　if (pen2Created = pen2.CreatePen(PS_SOLID, 1, downCol))
　　pDC->SelectObject( &pen2 );
　if (pen1Created)
　{
　　pen1.DeleteObject();
　　pen1Created = FALSE;
　}
　//画右下边缘
　pDC->MoveTo(rect.Width()-1,0);
　pDC->LineTo(rect.Width()-1,rect.Height()-1);
　pDC->LineTo(0,rect.Height()-1);
　pDC->MoveTo(rect.Width()-2,1);
　pDC->LineTo(rect.Width()-2,rect.Height()-2);
　pDC->LineTo(0,rect.Height()-2);
　if (pen2Created)//删除"pen2"画笔对象
　{
　　pen2.DeleteObject();
　　pen2Created = FALSE;
　}
　if (pen1Created = pen1.CreatePen(PS_SOLID, 1, edgeCol))
　　pOldPen = pDC->SelectObject( &pen1 );
　if (pen1Created)
　{
　　pen1.DeleteObject();
　　pen1Created = FALSE;
　}
　if (pOldPen != NULL)
　　pDC->SelectObject( pOldPen );
}

void CAviButton::DrawItem(LPDRAWITEMSTRUCT lpDrawItemStruct)
{
　// TODO: Add your code to draw the specified item
　CRect rect;
　GetClientRect(rect);
　if (!::IsWindow(AnimateCtrl))
　{
　　//在按钮上生成一个动画控件
　　AnimateCtrl.Create(WS_CHILD |WS_VISIBLE,rect,this,0);
　　//打开avi文件并显示第一帧
　　AnimateCtrl.Open(m_nAviID);
　　AnimateCtrl.GetClientRect(rect);
　}
　CDC* pDC = CDC::FromHandle(lpDrawItemStruct->hDC);
　UINT nState = lpDrawItemStruct->itemState;
　CRect buttonRect;
　GetClientRect(buttonRect);
　//绘制按钮
　DrawButton(pDC, nState, buttonRect);
}

BOOL CAviButton::Create(LPCTSTR lpszClassName, LPCTSTR lpszWindowName, DWORD
dwStyle, const RECT& rect, CWnd* pParentWnd, UINT nID, CCreateContext* pContext)
{
　// TODO: Add your specialized code here and/or call the base class
　return CWnd::Create(lpszClassName, lpszWindowName, dwStyle,
　rect, pParentWnd, nID, pContext);
}

void CAviButton::OnMouseMove(UINT nFlags, CPoint point)
{
　// TODO: Add your message handler code here and/or call default
　ClientToScreen(&point);
　CRect rcWindow;
　GetWindowRect(rcWindow);
　//判断鼠标是否经过按钮
　BOOL bNewMouseOverButton = rcWindow.PtInRect(point);
　if (bNewMouseOverButton && IsWindowEnabled() )
　{
　　if (::IsWindow(AnimateCtrl) && !bPlaying)
　　{
　　　AnimateCtrl.Play(0,-1,1);
　　　bPlaying = TRUE;
　　　SetCapture();
　　}
　}
　else
　{
　　bPlaying = FALSE;
　　ReleaseCapture();
　}
　CButton::OnMouseMove(nFlags, point);
}
/////////////////////////////////
BOOL CTestAviButtonDlg::OnInitDialog()
{
　CDialog::OnInitDialog();
　…………………//此处代码省略；
　m_AviButton.LoadAvi(IDR_AVI);
　return TRUE; // return TRUE unless you set the focus to a control
}

　　四、小结

　　通过CAnimateCtrl类和按钮控件的自画功能的结合，本实例实现了动画按钮，如果该类和工具条、状态条等控件结合，还可以实现在上述控件上播放动画视频流的效果。

    摘要：Windows的资源管理器想必大家都用过，该程序的窗口一分为二，左边的窗口显示本机当前所有驱动器以及驱动器中的所有文件夹，当用户单击文件夹后，如果该文件夹下面还有子文件夹，则上层文件夹展开显示下级的文件夹；否则，右边的窗口显示选择文件夹下的文件。那么这个程序是如何实现的呢？为了说明这个问题，本实例打造了一个简易的资源管理器，它实现了Windows资源管理器的主要功能，在显示文件的属性（如文件的文件名、文件的大小、文件的创建时间）的同时，还可以改变文件显示的方式，如大小图标方式、列表方式等。对于Visual C++初学者来说，这个实例和《实例2：打造自己的IE浏览器》要结合起来细细的学习、消化，这两个实例包含了Visual C++编程中的很多细节知识，如工具栏的处理、树型控件/列表控件的使用、窗口的拆分、字符串的处理等，相信读者朋友可以从中学到很多知识点。

　　一、 实现方法

　　从上面的界面效果图可以看出，在程序中使用了拆分窗口，在拆分的过程中，左边窗口为CTreeView 类的子类CLeftView，右边的窗口为CListView类的子类    （全文共38703字）——点击此处阅读全文

    摘要：

Part1

http://www.xanga.com/Kursk/514711235/item.html

此处阅读全文

    摘要：15号    （全文共3字）——点击此处阅读全文

    摘要：

part1:
http://bjyouth.ynet.com/article.jsp?oid=11686746
“EMBA”门槛：5000万？

http://www.msnbc.msn.com/id/14321230/
The Complete List: The Top 100 Global Universities

http://news.yam.com/cna/international/200608/20060814183310.html
北韓試射導彈四十天 金正日首次公開亮相

<    （全文共3417字）——点击此处阅读全文

    摘要：

part1:
http://business.sohu.com/20060813/n244766759.shtml
外企工会设立提速

http://post.biz.163.com/biz2_bbs/2NTHQN5A00020QFC.html
网友评论

http://news.shangdu.com/category/10004/2006/08/10/2006-08-10_383322_10004.shtml
84名学生被骗宁波打工被困续 女生双手泡烂

    （全文共4100字）——点击此处阅读全文

    摘要：

part1:
http://news.bbc.co.uk/2/hi/south_asia/4781925.stm
Pakistan arrests over bomb plot

http://news.bbc.co.uk/2/hi/americas/4781185.stm
Bush says plot a 'stark reminder'

http://seattle.bizjournals.com/seattle/stories/2006/08/07/daily20.html
Gates     （全文共3742字）——点击此处阅读全文

    摘要：

域名停放为啥能赚钱呢？ 简单的说，就是广告赚钱.
你有一个域名做了半年的网站，必定会有一个用户群会经常访问，也会有友情链接，也会有搜索引擎收录的网页。
这些都会给你的网站带来访问量。现在你不想做网站了。就把这个域名指向域名停放商那里，他们有基于模板的网
站，你指个域名过去它就自动生成一个网站，而这些网站是纯粹的广告，基本上页面上3/4的链接都是广告。用户进入
了这个网站，点了那些广告，然后广告商付钱给域名停放商，域名停放商分广告费给你：）这个比例每家都不同，
从30％到70％都有。

你的流量要是足够牛，可以自己去申请这些域名停放商的上级。
现在比较流行的是 google的 adsense for parking 和 yahoo 的 overture for parking

【申请图解】
点此链接---->  此处阅读全文

    摘要：

彩票栏目招聘专家撰稿人

要求对某一种彩票（足彩、双色球、排列三、3D等优先）有极强的分析推荐能力，预测准确，足彩要求非常了解赔率、有充足的上网时间，文笔较好，有经验者优先考虑。主要工作为TOM网提供稿件分析，及预测中奖号码等。

应聘时候请必须提供简历和作品到zhangzhiqiang#tomonline-inc.com，并请在标题注明：应聘彩票栏目专家（撰稿人），或者添加QQ629385585详谈（添加好友时请注入应聘彩票栏目专家或者撰稿人）

也可电话到010－67879997转5263

注：要求预测推荐准确率一定要很高，除了预测水平高外写稿能力也要强！

    （全文共445字）——点击此处阅读全文

    摘要：

part1:
http://www.china-woman.com/rp/main?fid=open&fun=show_news&from=view&nid=5982&ctype=3
女大学生应聘因胸围不达标被拒

http://www.takungpao.com/news/06/08/07/ZM-604364.htm
750元: 滬最低工資標準全國最高

http://news.w    （全文共2780字）——点击此处阅读全文

红色字体标记重要转会
蓝色字体标记最近更新转会
转会费单位:欧元

AC米兰:
转入:法瓦利(左后卫,国际米兰,自由转会) 科波拉(门将,阿斯科利,自由转会) 古尔库夫(中场 雷恩 300万欧元) 福贾(中场 阿斯科利 租借期满) 布罗基(中场 佛罗伦萨 未透露) 博内拉（后卫 帕尔马 未透露）
转出:菲奥里(门将 退役) 鲁伊·科斯塔(中场 本菲卡 自由转会) 舍甫琴柯(前锋 切尔西 5100万欧元) 斯塔母(后卫 阿贾克斯 300万欧元) 马佐拉蒂(后卫 恩波利 租借) 阿比亚蒂(门将 都灵 租借) 多纳蒂(中场 亚特兰大 租借)

可能转入：布冯 奥多 迪亚拉 伊布拉西莫维齐 


国际米兰:
转入:格罗索(后卫 巴勒莫 600万欧元) 达科特(中场 罗马 自由) 麦孔(后卫 摩纳哥 未透露) 马克斯维尔(后卫 恩波利 自由) 维埃拉（中场 尤文图斯 950万欧元） 克雷斯波(前锋 切尔西 租借)
转出:米哈伊洛维奇(后卫 退役) 法瓦利(后卫 AC米兰 自由转会) 沃姆(后卫 不莱梅 自由转会)
C·扎内蒂(中场 尤文图斯 自由转会) 德拉菲奥雷(后卫 巴勒莫 租借)  基利·冈萨雷斯（中场 罗萨里奥中央 自由）

可能转入： 伊布拉西莫维齐 托尼 塔瓦诺  

罗马:
转入:托内托(中场 桑普多利亚 自由) 卡塞蒂(后卫 莱切 300万) 阿尔瓦雷斯(前卫 佩那罗尔 40万)
转出:达科特(中场 国际米兰 自由) 托马西(中场  莱万特 自由)

可能转入：武西尼齐 克雷斯波 

巴勒莫:
转入:迪亚纳(中场 桑普多利亚 未透露) 布丹(前锋 亚特兰大 未透露) 皮萨诺(后卫 桑普多利亚 300万) 辛普里西奥(中场 帕尔马 550万) 德拉菲奥雷(后卫 国际米兰 租借) 丰塔纳(门将 切沃 自由) 瓜纳(前卫 阿斯科利 自由) 布雷西亚诺 （前锋 帕尔马 未透露）
转出:格罗索(后卫 国际米兰 600万) 桑塔纳(中场 佛罗伦萨 550万) 加斯巴罗尼(中场 尤文图斯 租借期满) 莫德斯科(中场 雷吉纳 租借期满) 瓜达尔本(门将 维琴查 自由) 阿卡尔迪(后卫 桑普多利亚 未透露) 布丹（前锋 帕尔马 租借）齐亚拉米塔罗（中场 帕尔马 未透露）马金瓦(前锋 拉齐奥 330万一半所有权) 巴罗内(中场 都灵 400万)

切沃:
转入:西奇尼亚诺(门将 莱切 自由) 卡尔博内(后卫 阿斯科利 自由) 卡列洛(中场 阿斯科利 自由)
转出:丰塔纳(门将 巴勒莫 自由)

利沃诺:
转入:维迪加尔(前卫 乌迪内斯 未透露)
转出:无

恩波利:
转入:马佐拉蒂(后卫 AC米兰 租借) 索达蒂(前锋 亚特兰大 自由)
转出:阿尔米隆(中场 乌迪内斯 共有) 马克斯维尔(后卫 国际米兰 自由) 洛迪(中场 弗罗辛诺内 租借)P-扎内蒂( 前卫 阿斯科利 自由）

帕尔马:
转入:穆斯利沃维奇(前锋 乌迪内斯 租借) 库图佐夫(前锋 桑普多利亚 自由) 布丹（前锋 巴勒莫  租借）齐亚拉米塔罗（中场 巴勒莫 未透露) 卡斯特利尼(后卫 贝蒂斯 自由)
转出:博纳佐利(前锋 桑普多利亚 自由) 辛普利西奥(中场 巴勒莫 550万) 弗雷(门将 佛罗伦萨 600万) 马尔奇奥尼(中场 尤文图斯 自由) 鲁奥波洛(前锋 特列斯蒂纳 共有) 布雷西亚诺（前锋 帕尔马 未透露） 博内拉（后卫 米兰 未透露) 

阿斯科利:
转入:帕柳卡(门将 博洛尼亚 自由) 恩希亚邦福姆(后卫 雷恩 租借) 佩科拉里(后卫 米涅里 未透露) 佩科拉里(后卫 阿维利诺 未透露) 纳斯塔塞(后卫 博洛尼亚 未透露）
转出:科波拉(门将 AC米兰 自由) 福贾(中场 AC米兰 租借期满) 瓜纳(中场 巴勒莫 自由) 卡列洛 卡尔博内(切沃 自由) 夸利亚雷拉(前锋 乌迪内斯 自由) 帕罗拉(中场 桑普多利亚 自由)德尔格罗索(后卫 卡利亚里 自由) P-扎内蒂（中场 恩波利 自由）

乌迪内斯:
转入:阿尔米隆(中场 恩波利 未透露) 夸利亚雷拉(前锋 阿斯科利 自由)  博格达尼(前锋 锡耶纳 350万) 达戈斯蒂诺（中场 梅西纳 120万）多塞纳（后卫 特雷维索 自由） 
转出:佩佩(前锋 卡利亚里 租借) 穆斯利沃维奇(前锋 帕尔马 租借) 贝托托(后卫 锡耶纳 未透露) 毛里(中场 拉齐奥 350万) 克里巴里(后卫 拉齐奥 350万) 维迪加尔(前卫 利沃诺 未透露) 莫罗（前卫 特雷维索 租借） 罗西尼(前锋 卡塔尼亚 未透露)

桑普多利亚:
转入:帕罗拉(中场 阿斯科利 自由) 阿卡尔迪(后卫 巴勒莫 未透露) 博纳佐利(前锋 帕尔马 未透露) 维埃里(前锋 摩纳哥 自由) 贝尔蒂（门将 佛罗伦萨 自由）
转出:托内托(中场 罗马 自由) 多米齐(中场 那不勒斯 未透露) 皮萨诺(中场 巴勒莫 300万) 库图佐夫(前锋 帕尔马 未透露) 迪亚纳(中场 巴勒莫 未透露)

雷吉纳:
转入:阿罗尼卡(后卫 梅西纳 未透露) 坎帕尼奥洛(门将 卡利亚里 未透露)
转出:帕雷德斯(中场 里斯本竞技 自由) 贝拉尔迪(门将 尤文图斯 租借)

卡利亚里:
转入:佩佩(前锋 乌迪内斯 租借) 德尔格罗索(后卫 阿斯科利 未透露) 福尔丁(门将 锡耶纳 自由) 卡尼尼(后卫 亚特兰大 自由)
转出:坎帕尼奥洛(门将 雷吉纳 未透露)

锡耶纳:
转入:弗里克(前锋 特纳纳 自由) 贝托托(后卫 乌迪内斯 自由)
转出:福尔丁(门将 卡利亚里 自由) 博格达尼(前锋 乌迪内斯 350万)

梅西纳:
转入:无
转出:阿罗尼卡(后卫 雷吉纳 自由) 达戈斯蒂诺（中场 乌迪内斯 120万）


拉齐奥：
转入：毛里 （中场 乌迪内斯 350万）克里巴里（后卫 乌迪内斯 350万）莱德斯马（中场 莱切 530万）博内托（后卫 恩波利 自由）穆塔雷利（中场 巴勒莫 自由) 马金瓦(前锋 巴勒莫 330万一半所有权)
转出：达博（中场  曼称 自由）莱奎（后卫 塞尔塔 75万）利维拉尼（中场 佛罗伦萨 自由）迪卡尼奥（前锋 西斯科罗马 自由） 

佛罗伦萨：
转入：波滕扎（后卫 国际米兰 未透露）弗雷（门将 帕尔马 575万）阿夫拉莫夫（门将 维琴查 未透露）利维拉尼（中场 拉齐奥 自由） 桑塔纳（中场 巴勒莫 550万） 穆图（前锋 尤文图斯 800万） 布拉西（中场 尤文图斯 租借）
转出：菲奥雷（中场 瓦伦西亚 租借回归）博季诺夫（前锋 尤文图斯 租借）布罗基（中场 米兰 回归）潘卡罗（后卫 都灵 未透露）凡蒂尼（前锋 博洛尼亚 租借） 贝尔蒂(门将 桑普多利亚 自由）


亚特兰大：
转入：多纳蒂（中场 米兰 租借）
转出：马科里尼（中场 切沃 未透露） 索达蒂（前锋 恩波利 未透露）


卡塔尼亚
转入：森本贵幸（前锋 东京日视 租借）罗西尼(前锋 乌迪内斯 未透露) 科卢奇(中场 维罗纳 共有))
转出：无


都灵：
转入：阿比亚蒂（门将 米兰 租借） 弗朗西斯基尼（后卫 雷吉纳 未透露） 潘卡罗 （后卫 佛罗伦萨 未透露） 巴罗内 (中场 巴勒莫 400万) 
转出：无

尤文图斯:
转入:博季诺夫(前锋 佛罗伦萨 租借) 加斯巴罗尼(中场 桑普多利亚 租界期满)扎内蒂 (中场 国际米兰 自由) 马尔奇奥尼(中场 帕尔马 自由) 贝拉尔迪(门将 雷吉纳 租借)
转出:穆图(前锋 佛罗伦萨 800万) 布拉西(中场 佛罗伦萨 租借) 卡纳瓦罗(后卫 皇家马德里 未透露) 埃莫森(中场 皇家马德里 未透露） 赞布罗塔（后卫 巴塞罗纳 1400万） 图拉母（后卫 巴塞罗纳 500万）) 维埃拉（中场 国际米兰 950万欧元）

    摘要：

part1:
http://www.zaobao.com/special/realtime/2006/08/060808_29.html
日内阁成员就8.15拜靖国表态 不参拜者居多

http://news.bbc.co.uk/chinese/simp/hi/newsid_5250000/newsid_5255100/5255118.stm
中国卫生部承认2003年禽流感案例

http://tech.sina.com.cn/i/2006-08-08/0833    （全文共3317字）——点击此处阅读全文

“我用博客找到了工作！”昨日，大学毕业便当上微软MVP的西华大学应届毕业生罗江华向记者透露了他博客求职成功的经历。记者发现，目前不少求职类网站纷纷推出“求职博客”，即求职者将自己的求职信息及自己对某领域的能力程度通过个人博客反映出来，希望得到用人单位的青睐，使用求职博客的多以应届大学生为主，但据学生们反映，用博客求职成功的并不多。

毕业于成都某大学的汪宇同学告诉记者：“用博客找工作非常方便，在家里网上将自己想展示的东西都放到网上，半小时都花不了。这比大家去挤招聘会舒服。”许多受访学生表示，使用网络为自己服务已不是什么稀奇事，博客能让公司更全面、丰富地了解自己。在酷部落大学生网站上，记者看到一些学生的求职博客更是五花八门，学生们将感悟生活的小文章、生活照片或艺术照、朋友评语放上了博客，一些学生甚至尝试着添加FLASH、音乐等多媒体内容，据汪宇同学介绍，求职博客要突出自己的与众不同，尽量将自己个性的一面展现出来。

罗江华告诉记者，自己从大三开始便在某IT技术网站上写个人博客，他的博客引起了一些IT企业的关注，今年5月，罗江华顺利被成都新蛋科技公司录用。

　　虽然学生们对轻松简单的博客求职乐此不疲，但记者调查中却发现，博客求职成功者甚少。

　　虽然学生们在博客上闹得火热，尴尬的是，许多用人单位对学生们个性新招并不“感冒”。成都某知名企业工作人员告诉记者，目前公司招聘新人一般采用毕业时校园招聘会和慕名前来的应聘者，收到的电子邮件简历公司也只挑选特别优秀的人通知面试，至于求职博客，该工作人员表示公司无暇关注。

    摘要：

 齐达内
(2001年,6620万美元)
尤文图斯→皇家马德里

舍甫琴科
(2006年,约6300万美元)
AC米兰→切尔西

费戈
(2000年,5610万美元)
巴塞罗那→皇家马德里

克雷斯波
(2000年,5410万美元)
帕尔马→拉齐奥

鲁尼
(2004年,4852万美元)
埃弗顿→曼联

此处阅读全文

    摘要：黄健翔上来解说了...    （全文共11字）——点击此处阅读全文

百位对了

十位和个位都错了

    摘要：

朋友，您还在每天一个一个苦苦地做点击吗?你每天24小时还在苦苦地挂机冲浪吗?你还在不停地换IP,清COOKIE努力为了那几毛钱甘当苦力做注册吗?您还在....搞网赚,目的都一样,但是结果却往往有很大区别。有人一年赚200元,有人一月赚2000元!为什么??很简单的道理:思路决定出路!选对项目是关键!!
下面本人潜心整理8个赚钱好项目,全部是经过多次收款验证!!每天只需要几分钟上网时间,每月稳赚2000元,最高一月突破5000元!!

一、新开中文MyPoll网上调查网,目前已经收到$327元!!
注册送1分,1分=1元,支付宝支付!
免费注册，参加调查，100%获现金！！！注册的朋友请登陆到您的帐户后,注册地址:http://www.mypoll.cn/vouch.asp?email=yi    （全文共2642字）——点击此处阅读全文

    摘要：    （全文共299字）——点击此处阅读全文

    摘要：

E-gold是一家有银行背景的网络机构，完全基于internet的网上支付平台，创建于95年底。它那完全匿名、快捷、方便、彻底粉碎地域概念的种种特点与优势，使之在短短6年的时间里，得到了迅猛的发展！国际上越来越多的公司和网络商店开始接受E-gold支付方式。它已经成为人们进行电子商务强有力的工具，包括象雅虎，亚马逊等很多网络公司都开通了E-gold支付交易方式，你只需花三分钟 就可以免费申请一个E-gold账号，账号之间互相转账只需10秒钟，你也可以把现金通过银行直接转到你的E-gold账号，也可以把账号里的收入转到全球任何一家银行你的私人账户里，而不论你身居何地、身处何方！它以黄金作为等价基础，完全脱离任何国家内部财政的影响！需要注意的是，e-gold和Paypal不同的地方，是e-gold是脱离付款公司的，就是说他只是一个中介机构，他不发任何钱，所以他不需要信用卡和银行帐户等烦琐的手续，所有兑换工作由各第三方机构完成。  

如何获得e-gold帐号？

个人注册    （全文共5711字）——点击此处阅读全文

    摘要：

Part 1

http://www.wenweipo.com/news.phtml?cat=004GJ&news_id=GJ0608030002&PHPSESSID=938a67ac46a8dc1d3183c201abcd3736
卡斯特羅:離死還遠

http://www.lazylife.org/2006/08/02/432
水 救援 黎巴嫩

此处阅读全文

    摘要：

part 1

http://big5.xinhuanet.com/gate/big5/news.xinhuanet.com/mil/2006-08/02/content_4907081.htm
朝韓兩國士兵在軍事分界線附近短暫交火

http://news.sina.com.cn/c/2006-08-01/14069626673s.shtml
丰胸减肥广告不惧禁令今晨仍在电视上播出

此处阅读全文

    摘要：

part 1

http://chinese.wsj.com/big5/20060727/bas132929.asp?page=article_front_big5_bas
日本財務大臣稱若當選首相將不參拜靖國神社

http://news.tom.com/2006-07-27/0021/77802705.html
731部队纪录片中惊现日本官房长官安倍晋三照片

http://mil.news.sohu.com/20060727/n244473295_2.shtml
    （全文共3278字）——点击此处阅读全文

part 1

http://big5.phoenixtv.com:82/gate/big5/bbs.phoenixtv.com/fhbbs/viewtopic.php?t=1985557
網友說網羅天下

http://news.sina.com.cn/c/2006-07-29/224610572625.shtml
銀監會高官預測建設新農村需15到20萬億元

http://comment4.news.sina.com.cn/comment/skin/default.html?channel=gn&newsid=1-1-10572625&style=0
網友評論

http://big5.xinhuanet.com/gate/big5/www.gd.xinhuanet.com/newscenter/2006-07/18/content_7540971.htm
北大引才四成是假，寧信其有

http://news.163.com/06/0730/03/2N8HF9RN0001124J.html
北大首次回應引進海外人才大多為造假說法

http://comment.news.163.com/news_guonei4_bbs/2N8HF9RN0001124J.html
網友評論

http://udn.com/NEWS/NATIONAL/NATS2/3447747.shtml
射總統府13槍 挺扁者收押

http://forum.udn.com/forum/list.jsp?news_id=3447747
網友評論

http://big5.ce.cn/xwzx/gnsz/gdxw/200607/28/t20060728_7915089.shtml
中國最新10大身價上億女富豪

http://news.sina.com.cn/c/2006-07-30/004710572726.shtml
雲南牟定撲殺全縣5萬條狗 打過疫苗也難倖免

http://comment4.news.sina.com.cn/comment/skin/default.html?channel=gn&newsid=1-1-10572726&style=0
網友評論

http://www.slate.com/id/2146770/
一個攝像師眼中的加沙

Part2

http://news.21cn.com/luntan/retie/2006/07/19/2654689.shtml
女作家反對冒死抵抗強姦
《面對強姦犯，冒死反抗是人類的恥辱》  陳嵐網名深海水妖的原文

http://www.zaobao.com/special/newspapers/2006/07/others060729.html
面對強姦，保生命還是保貞操

http://comment.news.qq.com/cgi-bin/comment_show?srv=news&id=421631
網友評論

http://comment2.news.sohu.com/viewcomments.action?id=244427116
網友評論