找了个简单的问题来解决

一、添加 url 字段，类型multiline_string,在defaultVlaue中添加代码如下：

sub url_defaultvalue(filename)
dim value
dim value1
value = getfieldvalue("id").getvalue()
value1 = "http://yourcqwebIP/cqweb/url/default.asp?id="&value
setfieldvalue fieldname, value1
end sub


备注：yourcqwebIP应该更改为您clearquest web服务器的地址或名字

二、添加email－rule如下：

[ 本帖最后由 derd 于 2006-10-25 00:40 编辑 ]

沙发＋顶啊

这样真的可行吗？
我按照这么做了后获得了如下地址
http://cqserver:8000/cqweb/url/default.asp?id=Test00000033
可是这样的地址并不正确，访问不到哟～～～

嗯！看到楼上的我也常是了下！确实不可以！
请楼主再说明下！
我的位2003.06.15版本！

value1 = "http://yourcqwebIP/cqweb/url/default.asp?id="&value

这行脚本适合于2002版本的Cq，对于 20030615是不适用的。

所以大家链接不到正确的地址。

20030615的Cq把不同的变更分为很多类型，所以这个value1的具体值和类型有关，主要你你使用的是那种类型就赋予不同值

我们以前的环境是 2003。06。00，一直没有问题


2003。06。15上不用测试也知道不行，2003.06.10＋以后，web 都是java的，上面的网页后缀是.asp而不是.jsp

我再做一个适合2003.06.15放上来，不过最近忙其他的时间可能会长些

[ 本帖最后由 derd 于 2006-10-27 07:39 编辑 ]

希望Derd尽快出来适合各个CQ版本的代码。这样方便大家使用。绝对的经典之作！

我来贴一个吧,使用在普通模式下,如果要使用在MultiSite模式下,判定一下当前site是哪个,重设一下$webpc就可以了.

sub  GetEmailLink{
my($dbid);
my($userdbname);
my($schemadbname);
my($defname);
my($dbDescObj);
my($emailLink);
my($webpc);

$session = $entity->GetSession();
# Get ID
$dbid = $entity->GetFieldValue("dbid")->GetValue();

# Get userdb
$dbDescObj = $session->GetSessionDatabase();
$userdbname = $dbDescObj->GetDatabaseName();
# Get defname
$defname = $entity->GetEntityDefName();

# Set your CQ webpc

$webpc = "127.0.0.1"; #replace with your CQ WEB server IP.

$ combine the  emailLink
$emailLink = "http://".$webpc."/cqweb/main?command=GenerateMainFrame&service=CQ&schema=".$schemadbname."&contextid=".$userdbname."&entityID=".$dbid."&entityDefName=".$defname;

return $emailLink;
}

使用方法:
在CQ的state record type中增加一个字段 email_link,然后当一个Defect提交时,调用这个方法生成email link,再填充到这个字段中,发送email时包括这个字段即可.

[ 本帖最后由 anthelion 于 2006-10-30 11:39 编辑 ]

尝试了！
不能显示！我希望在form中显示出来！但没有实现！

你是怎么样试的?说说步骤看?
我现在就这个就用的好好的啊.
我们用的是CQ6.15+SQLServer2000SP3.