01_9_14_8.asp.html
来自「有用的VC教程,包括编程思想编程技巧程序效率等方面的指导」· HTML 代码 · 共 376 行 · 第 1/2 页
HTML
376 行
}</td></tr></table><table width=100% ><tr><td class=a14>
catch(CDaoException* e){</td></tr></table><table width=100% ><tr><td class=a14>
e->Delete();</td></tr></table><table width=100% ><tr><td class=a14>
buf.SetRowCount(0);</td></tr></table><table width=100% ><tr><td class=a14>
return;</td></tr></table><table width=100% ><tr><td class=a14>
} </td></tr></table><table width=100% ><tr><td class=a14>
if(buf.GetValue(0L, 0).vt!=VT_NULL){</td></tr></table><table width=100% ><tr><td class=a14>
var=buf.GetValue(0, 0);</td></tr></table><table width=100% ><tr><td class=a14>
str=CString(var.bstrVal);</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->m_WorkCodeID=atol(str);</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
if(buf.GetValue(0L, 1).vt!=VT_NULL){</td></tr></table><table width=100% ><tr><td class=a14>
var=buf.GetValue(0, 1);</td></tr></table><table width=100% ><tr><td class=a14>
str=CString(var.bstrVal);</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->m_TimeIn.ParseDateTime(str);</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
if(buf.GetValue(0L, 2).vt!=VT_NULL){</td></tr></table><table width=100% ><tr><td class=a14>
var=buf.GetValue(0, 2);</td></tr></table><table width=100% ><tr><td class=a14>
str=CString(var.bstrVal);</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->m_TimeOut.ParseDateTime(str);</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
try{</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->Update();</td></tr></table><table width=100% ><tr><td class=a14>
}catch(CDaoException *e){</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->CancelUpdate();</td></tr></table><table width=100% ><tr><td class=a14>
e->Delete();</td></tr></table><table width=100% ><tr><td class=a14>
buf.SetRowCount(0);</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
</td></tr></table><table width=100% ><tr><td class=a14>
</td></tr></table><table width=100% ><tr><td class=a14>
void CMyView::OnUnboundAddDataDbgridMy(LPDISPATCH RowBuf, VARIANT FAR* NewRowBookmark) </td></tr></table><table width=100% ><tr><td class=a14>
{</td></tr></table><table width=100% ><tr><td class=a14>
// TODO: Add your control notification handler code here</td></tr></table><table width=100% ><tr><td class=a14>
RowBuffer buf(RowBuf);</td></tr></table><table width=100% ><tr><td class=a14>
COleVariant var;</td></tr></table><table width=100% ><tr><td class=a14>
CString str;</td></tr></table><table width=100% ><tr><td class=a14>
NewRowBookmark->vt=VT_NULL;</td></tr></table><table width=100% ><tr><td class=a14>
</td></tr></table><table width=100% ><tr><td class=a14>
//**********************************************************************</td></tr></table><table width=100% ><tr><td class=a14>
//Here was a portion of code that validated the record</td></tr></table><table width=100% ><tr><td class=a14>
//**********************************************************************</td></tr></table><table width=100% ><tr><td class=a14>
try{</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->AddNew();</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->Update();</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->SetBookmark(SchedQ->GetLastModifiedBookmark());</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->Edit();</td></tr></table><table width=100% ><tr><td class=a14>
}catch(CDaoException* e){</td></tr></table><table width=100% ><tr><td class=a14>
e->Delete();</td></tr></table><table width=100% ><tr><td class=a14>
buf.SetRowCount(0);</td></tr></table><table width=100% ><tr><td class=a14>
return;</td></tr></table><table width=100% ><tr><td class=a14>
} </td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->m_EmployeeID=m_pSet->m_EmployeeID;</td></tr></table><table width=100% ><tr><td class=a14>
try{</td></tr></table><table width=100% ><tr><td class=a14>
if(buf.GetValue(0L, 0).vt!=VT_NULL){ </td></tr></table><table width=100% ><tr><td class=a14>
var=buf.GetValue(0, 0);</td></tr></table><table width=100% ><tr><td class=a14>
}else{</td></tr></table><table width=100% ><tr><td class=a14>
var.vt=VT_I4; </td></tr></table><table width=100% ><tr><td class=a14>
var.lVal=0;</td></tr></table><table width=100% ><tr><td class=a14>
Column col(m_SchedGrid.GetColumns(var));</td></tr></table><table width=100% ><tr><td class=a14>
var=col.GetDefaultValue();</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
str=(char*)_bstr_t(var.bstrVal);</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->m_WorkCodeID=atol(str);</td></tr></table><table width=100% ><tr><td class=a14>
if(buf.GetValue(0L, 1).vt!=VT_NULL){</td></tr></table><table width=100% ><tr><td class=a14>
var=buf.GetValue(0, 1);</td></tr></table><table width=100% ><tr><td class=a14>
}else{</td></tr></table><table width=100% ><tr><td class=a14>
var.vt=VT_I4; </td></tr></table><table width=100% ><tr><td class=a14>
var.lVal=1;</td></tr></table><table width=100% ><tr><td class=a14>
Column col(m_SchedGrid.GetColumns(var));</td></tr></table><table width=100% ><tr><td class=a14>
var=col.GetDefaultValue();</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
str=(char*)_bstr_t(var.bstrVal);</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->m_TimeIn.ParseDateTime(str);</td></tr></table><table width=100% ><tr><td class=a14>
if(buf.GetValue(0L, 2).vt!=VT_NULL){</td></tr></table><table width=100% ><tr><td class=a14>
var=buf.GetValue(0, 2);</td></tr></table><table width=100% ><tr><td class=a14>
}else{</td></tr></table><table width=100% ><tr><td class=a14>
var.vt=VT_I4; </td></tr></table><table width=100% ><tr><td class=a14>
var.lVal=2;</td></tr></table><table width=100% ><tr><td class=a14>
Column col(m_SchedGrid.GetColumns(var));</td></tr></table><table width=100% ><tr><td class=a14>
var=col.GetDefaultValue();</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
str=(char*)_bstr_t(var.bstrVal);</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->m_TimeOut.ParseDateTime(str);</td></tr></table><table width=100% ><tr><td class=a14>
var.vt=VT_I4;</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->Update();</td></tr></table><table width=100% ><tr><td class=a14>
}catch(CDaoException *e){</td></tr></table><table width=100% ><tr><td class=a14>
e->Delete();</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->CancelUpdate();</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->Delete();</td></tr></table><table width=100% ><tr><td class=a14>
buf.SetRowCount(0);</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
NewRowBookmark->vt=VT_BSTR;</td></tr></table><table width=100% ><tr><td class=a14>
BstrFromVector(((LPVARIANT)SchedQ->GetBookmark())->parray,&(NewRowBookmark->bstrVal));</td></tr></table><table width=100% ><tr><td class=a14>
}</td></tr></table><table width=100% ><tr><td class=a14>
</td></tr></table><table width=100% ><tr><td class=a14>
</td></tr></table><table width=100% ><tr><td class=a14>
void CMyView::OnUnboundDeleteRowDbgridMy(VARIANT FAR* Bookmark) </td></tr></table><table width=100% ><tr><td class=a14>
{</td></tr></table><table width=100% ><tr><td class=a14>
// TODO: Add your control notification handler code here</td></tr></table><table width=100% ><tr><td class=a14>
VARIANT varbok;</td></tr></table><table width=100% ><tr><td class=a14>
varbok.vt=VT_ARRAY | VT_UI1;</td></tr></table><table width=100% ><tr><td class=a14>
VectorFromBstr(Bookmark->bstrVal,&varbok.parray);</td></tr></table><table width=100% ><tr><td class=a14>
try{</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->SetBookmark(COleVariant(varbok));</td></tr></table><table width=100% ><tr><td class=a14>
SchedQ->Delete();</td></tr></table><table width=100% ><tr><td class=a14>
}catch(CDaoException* e){</td></tr></table><table width=100% ><tr><td class=a14>
Bookmark->vt=VT_NULL;</td></tr></table><table width=100% ><tr><td class=a14>
e->Delete();</td></tr></table><table width=100% ><tr><td class=a14>
} </td></tr></table><table width=100% ><tr><td class=a14>
} </td></tr></table><table width=100% ><tr><td class=a14>
</td></tr></table><table width=100% ><tr><td class=a14>
</td></tr>
</table><br>
<style>.a1{font-size:1}</style>
<table width=100% ><tr><td align=right>(网页编辑:<a href='mailto:liu_yang@ccw.com.cn'>风之翼</a>)</td></tr></table>
</td><td class=a1 bgcolor=#f46240> </td>
<td valign=top width=138 align=right><table width=98% ><tr><td>
<form action='/app/gsearch1.asp' name=pdn><table width=100% ><tr><td>应用与方案
频道全文检索</td></tr>
<tr><td><input type="text" name="textfile" size=15 value=频道内检索 onfocus="this.value=''">
<input border=0 src="../../../../../images/jian.gif" name="I1" type="image" align=absmiddle>
</td></tr>
</table>
</form>
<form name=srch action="/search/which.asp" method=post onsubmit="JavaScript:return chk()">
<table width=100% >
<tr><td><select size="1" name="func">
<option selected value="2">主题检索</option>
<option value="1">周报全文检索</option>
<option value="3">模糊词检索</option>
</select></td></tr>
<tr><td><input type="text" name="SrchStr" size=15 value="输入待检索的词"
onfocus="this.value=''">
<input src="../../../../../images/jian.gif" name="I1" type="image" align="absMiddle" border=0>
</td></tr>
</table>
<script language="JavaScript">
function chk()
{if (!document.srch.SrchStr.value){
alert("请输入需检索的词!");
document.srch.SrchStr.focus();
return false;
}
else{if (document.srch.SrchStr.value.length>30){
alert("检索的词请不要超过30个字符!");
document.srch.SrchStr.focus();
return false;
}
}
}
</script></form>
<table width=100% ><tr><td class=f colspan=2><b>相关文章</b></td></tr>
<tr><td valign=top><IMG SRC=../../../../../img2/jiao.gif></td><td><a href='01_9_14_7.asp.html'>利用VC++获取异构型数据库库结构信息</a></td></tr>
<tr><td valign=top><IMG SRC=../../../../../img2/jiao.gif></td><td><a href='01_9_14_6.asp.html'>在Visual C++中用ADO进行数据库编程</a></td></tr>
<tr><td valign=top><IMG SRC=../../../../../img2/jiao.gif></td><td><a href='01_9_14_5.asp.html'>使用OLEDB编写数据库应用程序</a></td></tr>
<tr><td valign=top><IMG SRC=../../../../../img2/jiao.gif></td><td><a href='01_9_14_4.asp.html'>在VC中使用ADO开发数据库应用程序</a></td></tr>
<tr><td valign=top><IMG SRC=../../../../../img2/jiao.gif></td><td><a href='01_9_14_3.asp.html'>用Visual C++开发数据库应用程序</a></td></tr>
</table>
</td></tr></table></td></tr></table><br>
<table align=center width=680><tr><td align=right>
<form name=mail method=post action='/pub/subMail.asp' onsubmit='JavaScript: return chkField(this)'>
<INPUT type='hidden' name='rec' value='24222'>
您的姓名:<INPUT type="text" name=myName size=10>
您朋友的E-mail:<INPUT type="text" name=friendMail size=10>
<INPUT type="submit" value="推荐给好友">
</form>
</td></tr>
<tr><td align=right>
<b>[<a href="javascript:window.close()">关闭窗口</a>]</b>
</td></tr>
</table>
<script language="javascript">
function chkField(fmObj)
{if (!fmObj.friendMail.value){
alert("请输入您朋友的E-mail!");
fmObj.friendMail.focus();
return false;
}
return true;
}
</script>
<table align=center width=680>
<tr><td><hr size=1 width=660 color=#f46240></td></tr>
</table><br>
<p align=center>Copyright(C) ccw.com.cn,All rights reserved</p>
<p align=center><b>中国计算机世界出版服务公司版权所有</b></p>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?