| Line 186... |
Line 186... |
| 186 |
|
186 |
|
| 187 |
If rsQry.RecordCount <> "" Then
|
187 |
If rsQry.RecordCount <> "" Then
|
| 188 |
While ((NOT rsQry.BOF) AND (NOT rsQry.EOF))
|
188 |
While ((NOT rsQry.BOF) AND (NOT rsQry.EOF))
|
| 189 |
If rsQry("user_email") <> "" Then
|
189 |
If rsQry("user_email") <> "" Then
|
| 190 |
Send_Email "Release Manager Notification",_
|
190 |
Send_Email "Release Manager Notification",_
|
| 191 |
adminEmail, _
|
191 |
ADMIN_EMAIL, _
|
| 192 |
rsQry("user_email"),_
|
192 |
rsQry("user_email"),_
|
| 193 |
"Version "& rsQry("pkg_version") &" of Package "& rsQry("pkg_name") &" in Project " & rsQry("proj_name") &" on Release Branch " & rsQry("rtag_name") &" has been released.",_
|
193 |
"Version "& rsQry("pkg_version") &" of Package "& rsQry("pkg_name") &" in Project " & rsQry("proj_name") &" on Release Branch " & rsQry("rtag_name") &" has been released.",_
|
| 194 |
"You have received this email as a result of your interest in this package. If you do not wish to receive further emails then remove your package interest from the notifications area in Release Manager.",_
|
194 |
"You have received this email as a result of your interest in this package. If you do not wish to receive further emails then remove your package interest from the notifications area in Release Manager.",_
|
| 195 |
NULL
|
195 |
NULL
|
| 196 |
End If
|
196 |
End If
|
| Line 295... |
Line 295... |
| 295 |
|
295 |
|
| 296 |
If rsQry.RecordCount <> "" Then
|
296 |
If rsQry.RecordCount <> "" Then
|
| 297 |
While ((NOT rsQry.BOF) AND (NOT rsQry.EOF))
|
297 |
While ((NOT rsQry.BOF) AND (NOT rsQry.EOF))
|
| 298 |
If rsQry("user_email") <> "" Then
|
298 |
If rsQry("user_email") <> "" Then
|
| 299 |
Send_Email "Release Manager Notification",_
|
299 |
Send_Email "Release Manager Notification",_
|
| 300 |
adminEmail, _
|
300 |
ADMIN_EMAIL, _
|
| 301 |
rsQry("user_email"),_
|
301 |
rsQry("user_email"),_
|
| 302 |
"New Version of Package "& rsQry("pkg_name") &" in Project " & rsQry("proj_name") &" on Release Branch " & rsQry("rtag_name") &" would be autobuild soon.",_
|
302 |
"New Version of Package "& rsQry("pkg_name") &" in Project " & rsQry("proj_name") &" on Release Branch " & rsQry("rtag_name") &" would be autobuild soon.",_
|
| 303 |
"You have received this email as a result of your interest in this package. If you do not wish to receive further emails then remove your package interest from the notifications area in Release Manager.",_
|
303 |
"You have received this email as a result of your interest in this package. If you do not wish to receive further emails then remove your package interest from the notifications area in Release Manager.",_
|
| 304 |
NULL
|
304 |
NULL
|
| 305 |
End If
|
305 |
End If
|