技术点滴

net 配置站点时出现部件无法访问对路径“C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\Temporary ASP.NET Files\root\7bc8d69f\e3d704c8”的访问被拒绝。

木子的blog — Thu, 10 May 2007 03:09:00 GMT

对路径“C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\Temporary ASP.NET Files\root\7bc8d69f\e3d704c8”的访问被拒绝。

版本信息: Microsoft .NET Framework 版本:1.1.4322.2300; ASP.NET 版本:1.1.4322.2300

一般都是组件访问被拒绝, 有时很火，IIS重启不行，系统注销也不行，只有重启，但现在可以不要了

解决方法一:

1.开始 -- 管理工具 -- 计算机管理（Win2003的位置，其他操作系统类似）打开计算机管理
－－展开计算机管理左边树中“服务和应用程序”节点，再在其下展开“索引服务”节点，停止服务，最好最快的方法

解决方法二(转载):

2.1、开始 -- 管理工具 -- 计算机管理（Win2003的位置，其他操作系统类似）打开计算机管理
2.2、展开计算机管理左边树中“服务和应用程序”节点，再在其下展开“索引服务”节点，再在其下展开“System”节点，再在其下展开“目录”节点。
2.3、在计算机管理的右边我们可以看到配置的索引服务目录。
2.4、在“目录”节点上右击鼠标，选择“新建”--“目录”
2.5、在“添加目录”对话框中，路经输入框中输入 ASP.net 的临时文件目录。默认应该是：
c:\<WINDIR>\Microsoft.NET\Framework\<Version Number>\Temporary ASP.NET Files 目录。
<Version Number> 指你要处理的.net版本。
2.6、在“包含在索引中吗？”选项中，选择“否”
2.7、单击“确定”按钮
2.8、在“索引服务”节点上右键单击，重起索引服务即可。

解决方法三:
1. 可以删除 bin\XX.pdb

引: http://qiao198.cnblogs.com/archive/2005/08/11/212246.html

net 2003中做web项目打包

木子的blog — Thu, 10 May 2007 02:34:00 GMT

1.打开VS.NET开发环境;
2."文件"->"新建"->"项目";
3."项目类型"选"安装和部署项目","模板"选"Web安装项目",然后填写"名称"和"位置",最后"确定";
4.鼠标右击"解决方案",选择"添加"->"Web上现有的项目",然后根据屏幕提示选择要发布的项目;
5.右击"Web应用程序文件",选择"添加"->"项目输出";
6.在"添加项目输出组"对话框中选择"主输出"和"内容文件",最后"确定";
7."生成"->"生成项目",完成后生成的安装程序在第3步所指定的文件夹下,运行setup即可发布;

当然,发布的机器上必须安装好.net framework和iis.

你要注意这一步
6.在"添加项目输出组"对话框中选择"主输出"和"内容文件",最后"确定";

7.其它文件要建立相应文件夹，将文件手工加入
8.若有水晶报表等 ,请加入程序集水晶报表依赖的动态库..

重新生成便可

ASP.NET 中DorpDownList控件绑定显示多个字段值

木子的blog — Wed, 31 May 2006 08:57:00 GMT

ASP.NET---合并多个字段值

一般支持数据绑定的web

控件，例如DorpDownList控件、CheckBoxList控件等，都包含五个属性：DataSource、DataMember，DataTextField、DataValueField和DataTextFormatString。DataSource用于获取数据源，亦即获取包含数据的集合；其他四个属性用于获取数据源中的一个字段值。然而，通常情况下，你想将这些数据源中的多个字段值绑定在一起赋值给其中的一个属性，这是不能直接实现的。下面我们将介绍两种方法用于实现这一功能。

以上限制在于不能将多个字段值绑定在一起，赋值给这四个属性中的其中一个；但是SQL语句却完全没有这种限制。所以，我们的第一个方法是使用SQL语句将源表中的两个或多个字段值绑定在一起，使用AS子句传递给另一个字段，这样就实现了一个字段包含多个字段值。由于现在一个字段就包含了多个字段的值，我们将其赋值给web控件的那四个属性时就不用有更多的考虑了。我们可以参考下面的语句看看这种方法的妙处：

strCmd="SELECTemployeeid,lastName+','+firstNameAS'EmployeeName'FROM Employees";

这种方法十分简洁，也是最直接的一种方法，不过存在着效率不足的问题，而且有可能会产生重复数据。下面我们介绍另一种方法，我们可以将源表填充到一个数据集DataSet中，然后将数据集的数据放置到一个数据表DataTable中，然后给该表创建一个新列，该列由源表中的两个或多个字段构成，这样我们也实现了多个字段值的绑定。下面的语句可以说明这种方法的实现：

dt.Columns.Add(“EmployeeName”,typeod(String),”lastName+’,’+firstName”);

后一种方法的缺点在于创建新列的开销。不过这种方法条理比较清楚，而且不会产生重复数据的可能，建议使用这种方法。

为了说明这两种方法，下面的代码将两种方法放在一起实现了：

//在此处放置用户代码以初始化页面

stringstrConn,strCmd;

strConn="DATABASE=NorthWind;SERVER=localhost;UID=sa;PWD=99133009;";

如果既需要将firstName和LastName绑定，又需要单独使用他们，下面的语句就会产生重复数据。

strCmd="SELECTemployeeid,firstName,lastName,lastName+'---'+firstName AS'EmployeeName' FROMEmployees";

SqlDataAdapterdsda=newSqlDataAdapter(strCmd,strConn);

DataSetds=newDataSet();

dsda.Fill(ds,"EmployeeList");

DataTabledt=ds.Tables["EmployeeList"];

//第一种方法

//DDL1是一个DropDownList控件

DDL1.DataSource=dt.DefaultView;

DDL1.DataTextField="EmployeeName";

DDL1.DataValueField="employeeid";

DDL1.DataBind();

/*第二种方法

dt.Columns.Add("EmployeeName",typeod(String),"lastName+','+firstName");

DDL1.DataTextField="EmployeeName";

DDL1.DataBind();

ASP.NET中存取图片到数据库的示例

木子的blog — Thu, 29 Dec 2005 01:53:00 GMT

//开发环境：Window 2000、SQLServer2000、.Net Framework SDK正式版
//开发语言：C#、ASP.Net
//简介：数据库中图片存蓄及读取
//作者：engine
/*
说明：在ASP中，我们用Request.TotalBytes、Request.BinaryRead()来上传图片，这个可恶的BinaryRead()方法非常笨，单个文件上传倒没什么大事，单如果多个图片上专可就花大气力了…！而现在ASP.Net中将会把解决以前ASP中文件上传的种种问题，使你在ASP.Net中轻轻松松开发出功能强大的上传程序，下面大家看看例子啦。
*/
//注意：由于作者水平有限，错误是难免的，如发现错误请指教
//Email:e_engine@21cn.com

/*
首先在SQL Server中建立一个图片存储的数库表，ImageData Column为图象二进制数据储存字段，ImageContentType Column为图象文件类型记录字段，ImageDescription Column为储蓄图象文件说明字段,ImageSize Column为储存图象文件长度字段，结构如下：
CREATE TABLE [dbo].[ImageStore] (
    [ImageID] [int] IDENTITY (1, 1) NOT NULL ,
    [ImageData] [image] NULL ,
    [ImageContentType] [varchar] (50) COLLATE Chinese_PRC_CI_AS NULL ,
    [ImageDescription] [varchar] (200) COLLATE Chinese_PRC_CI_AS NULL ,
    [ImageSize] [int] NULL
) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]
*/

//UpLoadImage.aspx程序内容如下：
<%@ Page Inherits="UploadImage.UploadImage" SRC="UpLoadImage.cs" Language="C#"%>
<HTML><title>上传图片</title>
<BODY bgcolor="#FFFFFF">
<FORM ENCTYPE="multipart/form-data" RUNAT="server" ID="Form1">
<TABLE RUNAT="server" WIDTH="700" ALIGN="left" ID="Table1" cellpadding="0" cellspacing="0" border="0">
<TR>
     <TD>上传图片(选择你要上传的图片)</TD>
<TD>
<INPUT TYPE="file" ID="UP_FILE" RUNAT="server" STYLE="Width:320" ACCEPT="text/*" NAME="UP_FILE">
</TD>
</TR>
<TR>
     <TD>
      文件说明(添加上传图片说明，如：作者、出处)
     </TD>
<TD>
<asp:TextBox RUNAT="server" WIDTH="239" ID="txtDescription" MAINTAINSTATE="false" />
</TD>
</TR>
<TR>
<TD>
<asp:Label RUNAT="server" ID="txtMessage" FORECOLOR="red" MAINTAINSTATE="false" />
</TD>
<TD>
<asp:Button RUNAT="server" WIDTH="239" ONCLICK="Button_Submit" TEXT="Upload Image" />
</TD>
</TR>
</TABLE>
</FORM>
</BODY>
</HTML>
//-------------------------------------------------------------------
//UpLoadImage.cs程序内容如下：
using System;
using System.Web;
using System.IO;
using System.Data;
using System.Data.SqlClient;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.HtmlControls;
namespace UploadImage
{
public class UploadImage : Page {
protected HtmlInputFile UP_FILE;          //HtmlControl、WebControls控件对象
protected TextBox txtDescription;
protected Label txtMessage;
protected Int32 FileLength = 0;          //记录文件长度变量
protected void Button_Submit(System.Object sender, System.EventArgs e) {
HttpPostedFile UpFile = UP_FILE.PostedFile; //HttpPostedFile对象，用于读取图象文件属性
FileLength = UpFile.ContentLength;     //记录文件长度
try {
if (FileLength == 0) {   //文件长度为零时
txtMessage.Text = "<b>请你选择你要上传的文件</b>";
} else {
Byte[] FileByteArray = new Byte[FileLength];   //图象文件临时储存Byte数组
Stream StreamObject = UpFile.InputStream;      //建立数据流对像
//读取图象文件数据，FileByteArray为数据储存体，0为数据指针位置、FileLnegth为数据长度
StreamObject.Read(FileByteArray,0,FileLength);
//建立SQL Server链接
SqlConnection Con = new SqlConnection("Data Source=Localhost;Initial Catalog=testdb;User ID=sa;Pwd=;");
String SqlCmd = "INSERT INTO ImageStore (ImageData, ImageContentType, ImageDescription, ImageSize) VALUES (@Image, @ContentType, @ImageDescription, @ImageSize)";
SqlCommand CmdObj = new SqlCommand(SqlCmd, Con);
CmdObj.Parameters.Add("@Image",SqlDbType.Binary, FileLength).Value = FileByteArray;
CmdObj.Parameters.Add("@ContentType", SqlDbType.VarChar,50).Value = UpFile.ContentType; //记录文件类型
//把其它单表数据记录上传
CmdObj.Parameters.Add("@ImageDescription", SqlDbType.VarChar,200).Value = txtDescription.Text;
//记录文件长度，读取时使用
CmdObj.Parameters.Add("@ImageSize", SqlDbType.BigInt,8).Value = UpFile.ContentLength;
Con.Open();
CmdObj.ExecuteNonQuery();
Con.Close();
txtMessage.Text = "<p><b>OK!你已经成功上传你的图片</b>";//提示上传成功
}
} catch (Exception ex) {
txtMessage.Text = ex.Message.ToString();
}}}}
//----------------------------------------------------------------------
//好了，图片已经上传到数据库，现在还要干什么呢？当然是在数据库中读取及显示在Web页中啦,请看以下程序:
//ReadImage.aspx程序内容如下：
/-----------------------------------------------------------------------
<%@ Page Inherits="ReadImage.MainDisplay" SRC="ReadImage.cs"%>
//----------------------------------------------------------------------
//ReadImage.cs程序内容如下：
using System;
using System.Data;
using System.Data.SqlClient;
using System.Web.UI;
using System.Web.UI.WebControls;
using System.Web.UI.HtmlControls;
namespace ReadImage {
public class MainDisplay : System.Web.UI.Page {
public void Page_Load(System.Object sender, System.EventArgs e) {
    int ImgID = Convert.ToInt32(Request.QueryString["ImgID"]); //ImgID为图片ID
    //建立数据库链接
    SqlConnection Con = new SqlConnection("Data Source=KING;Initial Catalog=testdb;User ID=sa;Pwd=;");
    String SqlCmd = "SELECT * FROM ImageStore WHERE ImageID = @ImageID";
    SqlCommand CmdObj = new SqlCommand(SqlCmd, Con);
    CmdObj.Parameters.Add("@ImageID", SqlDbType.Int).Value = ImgID;
    Con.Open();
    SqlDataReader SqlReader = CmdObj.ExecuteReader();
    SqlReader.Read();
    Response.ContentType = (string)SqlReader["ImageContentType"];//设定输出文件类型
    //输出图象文件二进制数制
    Response.OutputStream.Write((byte[])SqlReader["ImageData"], 0, (int)SqlReader["ImageSize"]);
    Response.End();
    Con.Close();
    //很简单吧^_^
}
}
}
//--------------------------------------------------------------------
//最后，我们当然要把它在Web页面显示出来啦
//ShowImage.hml
<html>
<body>
这个是从数据库读取出来的图象：<img src="ReadImage.aspx?ImgID=1">
<body>
</html>
//------------------------------------------------------------------
//最后，这程序当然还很多改进之处，希望大家多想想多编编一定可以写出更多的图象上传程序
//Good Luck，engine

VC++在数据库进行操作时。字符串格式化不同类型小结及取出记录集中数据方法

木子的blog — Mon, 31 Oct 2005 00:32:00 GMT

//运行环境 vc++和Access 2000
//对于货币直接格成字符串.日期则加上#
CString sql;
sql.format( “Update set table 货币单价=%s,日期字段=#%s#”,m_COleCurrency.Format(),  m_CTime.Format("%Y/%m/%d"))

//从记录集中取数据
_variant_t var;
COleCurrency m_Cost_Price;
CFields pFields;
//货币型   直接加字符名便可. 注意不要用索引号来
      var=pFields.GetItem(_variant_t("成本价")).GetValue();
      VariantChangeType(&var,&var,0,VT_CY);
       m_Cost_Price=(var.vt!=VT_NULL)?var.cyVal:COleCurrency(0,0);

//Float 型
       var=pFields.GetItem((_variant_t)("包装长")).GetValue();
      VariantChangeType(&var,&var,0,VT_R4);
       m_Float=(var.vt!=VT_NULL)?var.fltVal:0.0f

//字符型
        var=pFields.GetItem((_variant_t)("备注")).GetValue();
        str=(var.vt!=VT_NULL)?(BSTR)var.bstrVal:'\0';

//存取时
CString m_contact_person;
pReh->PutCollect("Contact_Person",(_variant_t)m_contact_person);

//对于记录重新
pReh->Requery(adOptionUnspecified);

vb打开文本文件的几例!

木子的blog — Mon, 26 Sep 2005 07:40:00 GMT

方法一:
用定长的String变量获取文本内容。由于定长String变量支持的下界为65400,所以在打开超过32K字节的文件时超出部分的字节将无法获取:
Private Sub Command1_Cliack()
Dim sA As String * 65400 '声明定长String变量
Open "F:\d.txt" For Binary As #1 '用二进制打开文件
Get #1, , sA '用Get语句从文件中获取字节
Text1 = sA '显示打开的文件
Close #1 '关闭文件
End Sub

方法二:
先声明一字符串变量，然后用空格填充字符串，使变量大小与文件大小一致，再通过Get语句将文件全部数据存储到变量中，从而达到获取整个文件字节数的目的。此法可以打开大于32K的文件，但应该注意的是，装载文件的容器必须能装载大于32K的文件，下例用RichTextBox控件显示打开的文件：
Private Sub Command1_Click()
Dim sA As String
Open "f:\d.txt" For Binary As #1
sA = Space(LOF(1)) '用空格填充sA变量
Get #1, , sA '用Get语句获取文件全部内容
RichTextBox1.Text = sA
Close #1
End Sub

方法三：
用StrConv函数将文件的控制字符串数据和Unicode码之间进行转换，从而达到打开文件的目的。可打开任意大小文件。此法笔者曾有一篇文章谈及，这里再给一个简单例子：
Private Sub Command1_Click()
Open "f:\d.txt" For Input As #1
RichTextBox1.Text = StrConv(InputB$(LOF(1), 1), vbUnicode)
Close #1
End Sub

方法四：
用Shell语句直接调出Windows的记事本，给个文件名即可轻而易举地打开文本文件。此法适合于打开程序的Readme文件(注意：在可执行文件和要打开的文本文件之间要有空格)：
Shell "NotePad.EXE f:\d.txt",vbNormalFucus

方法五：
用RichTextBox控件自身的LoadFile属性打开文件：
RichTextBox1.LoadFile "f:\d.txt", rtfText

用vb创建多层文件夹过程

木子的blog — Thu, 15 Sep 2005 08:17:00 GMT

Sub CreateDirectory(vDirectory As String)
'*******************************************************************************
'Sub: CreateDirectory
'Input: you want to build full path
'Subject: loop to build full path
'Prepared Date: 2005/9/06
'Last Modified Date: 2005/10/06
'*******************************************************************************
On Error GoTo Cmd_Err
Dim str1$, vpos%, vpostemp%, strComputerName$ 'vpos 是位置

vpos = 1
vpostemp = 1
  '判断全文件是否存在
If (Dir(vDirectory, vbDirectory)) <> "" Then Exit Sub

'判断是否非本机途径 \\jim97\bondale\1
If Len(vDirectory) >= 3 And VBA.Left$(vDirectory, 2) = "\\" Then
    vpos = InStr(3, vDirectory, "\", vbTextCompare)
    strComputerName = Mid(vDirectory, 1, vpos - 1)
    '从\下位开始
    vpos = vpos + 1

End If

'loop建文件夹
While vpostemp > 0
   vpostemp = InStr(vpos, vDirectory, "\", vbTextCompare)
   If strcomputer <> "" Then
     str1 = strComputerName & "\" & Mid$(vDirectory, 1, vpostemp) '非本机
   Else
     str1 = Mid$(vDirectory, 1, vpostemp)
   End If

   If (Dir(str1, vbDirectory)) = "" Then
    MkDir (str1)
   End If
   vpos = vpostemp + 1
Wend
'建立全文件夹
If (Right(vDirectory, 1)) <> "\" Then MkDir vDirectory
Exit Sub
Cmd_Err:
   MsgBox "创建错误: " & Err.Description
End Sub

由变量可以得出其指针和窗口句柄常用法

木子的blog — Wed, 07 Sep 2005 02:15:00 GMT

如定义个对象类 CEdit m_edit;
其指针CWnd*pwnd=&m_edit;//注意m_edit一定要初始化后才可
其句柄为 m_edit.GetSaftHwnd()

控件的提示文字的CToolTipCtrl的用法!

木子的blog — Wed, 07 Sep 2005 01:57:00 GMT

一: 定义全局变量 CToolTipCtrl m_tooltip和CWnd* pwnd;//pwnd用来指定要显示控件的指针
二:在窗体的OnInitDialog()中或OnShowWindow()中创建m_tooltip.

    //创建m_tooltip
    m_tooltip.Create(pwnd);

   //将CToolTipCtrl与相应的控件对应起来
    m_tooltip.AddTool(pwnd,TTS_ALWAYSTIP);

   //设定文字的颜色
    m_tooltipSetTipTextColor(RGB(0,0,255));
//设定提示文字在控件上停留的时间
   m_tooltipSetDelayTime(150);

三: 重载CTipTestDlg::PreTranslateMessage(MSG* pMsg)函数,增加如下代码:

    //如果m_tip[0]句柄不为空,就从主窗口中捕获消息,如WM_MOUSEMOVE,WM_LBUTTONDOWN等消息
      
 if(m_tooltip.m_hWnd!=NULL)
  m_tooltip.RelayEvent(pMsg);

4、捕获主窗口的WM_MOUSEMOVE消息,在CTipTestDlg::OnMouseMove(UINT nFlags, CPoint point)函数中增加如下代码:

  //鼠标在相应的控件上移动时显示提示文字
    m_tooltip.UpdateTipText("怎么样",pwnd);

修改对话框,文本，静态文件等背景方法几则

木子的blog — Fri, 26 Aug 2005 06:30:00 GMT

修改对话框背景方法有很多可以在OnDraw().OnCtlColor().和OnEraseBkgnd()中进行.其中OnCtlColor()是画笔.可以对控件。而对话框可以在OnEraseBkgnd().
其中可以通过修改画笔填空和BitBlt两种方法!

void CInfoView::OnDraw(CDC* pDC)
{
// TODO: Add your specialized code here and/or call the base class
  //*//////////////
        CBitmap bmp; //IDR_BMP1;
    if(bmp.LoadBitmap(IDB_BITMAP2))
    {
        BITMAP bmpInfo;
        bmp.GetBitmap(&bmpInfo);

      CRect rect;
      GetClientRect(&rect);

       CDC dcMem;
        dcMem.CreateCompatibleDC(pDC);
        int nX = rect.left +(rect.Width()- bmpInfo.bmWidth) / 2;
        int nY = rect.top +(rect.Height()- bmpInfo.bmHeight) / 2;

        CBitmap *pOldBmp;
        pOldBmp=dcMem.SelectObject(&bmp);
//pDC->BitBlt(nX,nY,bmpInfo.bmWidth,bmpInfo.bmHeight,&dcMem,0,0, SRCCOPY);
pDC->StretchBlt(rect.left,rect.top ,rect.Width(),rect.Height(),&dcMem, 0, 0,bmpInfo.bmWidth,bmpInfo.bmHeight, SRCCOPY);
  dcMem.SelectObject(pOldBmp);
    bmp.DeleteObject();
  }
        //*//////////////

/////////////////////////////////////////////////////////////
/////////////////////////////////////////////////////////////
BOOL CInfoView::OnEraseBkgnd(CDC* pDC)
{
// TODO: Add your message handler code here and/or call default
//*//////////////
      CBitmap bmp; //IDR_BMP1;
    if(bmp.LoadBitmap(IDB_BITMAP2))
    {
        BITMAP bmpInfo;
      bmp.GetBitmap(&bmpInfo);

       CRect rect;
       GetClientRect(&rect);
////////////////////////////////////////////
以下直接用CBrush 在当前DC中操作，则简单。有可能有多个图片(若背景小于)
  CBrush m_brush(&bmp); //用CBitmap初始化画笔
  pDC->FillRect(&rect,&m_brush); //用画笔填空
///////////////////////////////////////////////////
        /*/////////
//以下通过方法二是通过BitBlt来进行
        CDC dcMem;
  dcMem.CreateCompatibleDC(pDC);
        int nX =rect.right- rect.left;// rect.left+ (rect.Width() - bmpInfo.bmWidth) / 2;
        int nY =rect.bottom-rect.top; //rect.top + (rect.Height() - bmpInfo.bmHeight) / 2;

        CBitmap *pOldBmp;
        pOldBmp=dcMem.SelectObject(&bmp);
pDC->StretchBlt(0,0 ,nX,nY,&dcMem, 0, 0,bmpInfo.bmWidth,bmpInfo.bmHeight, SRCCOPY);
      dcMem.SelectObject(pOldBmp);
        bmp.DeleteObject();

  //*/////////
  }
        //*//////////////
    return FALSE;//要修改返非0值
    //return CFormView::OnEraseBkgnd(pDC);
}

}

//////////////////////////////////////////////
//////////////////////////////////////////////
HBRUSH CInfoView::OnCtlColor(CDC* pDC, CWnd* pWnd, UINT nCtlColor)
{//以下是修改画笔
HBRUSH hbr = CFormView::OnCtlColor(pDC, pWnd, nCtlColor);
// TODO: Change any attributes of the DC here
if(nCtlColor==CTLCOLOR_EDIT||nCtlColor==CTLCOLOR_BTN)
{
            CBitmap bmp;
    if(bmp.LoadBitmap(IDB_BITMAP2))
    {
     CRect rect;
     pWnd->GetClientRect(&rect);
     CBrush m_brush(&bmp);
     //pDC->FillRect(&rect,&m_brush);//方法一可以填空
     //pDC->SetBkMode(OPAQUE);
     return (HBRUSH)m_brush;//方法二修改画笔
    }
    else
        pDC->SetBkColor(RGB(255, 0, 0));

}
if(nCtlColor==CTLCOLOR_STATIC)
{//以下可使Static变成透明
            pDC->SetTextColor( RGB( 255,170,70 ) );
            pDC->SetBkMode(TRANSPARENT);
            return (HBRUSH)GetStockObject(NULL_BRUSH);

}
// TODO: Return a different brush if the default is not desired
return hbr;
}